Commit 4696802b authored by Juanma Barranquero's avatar Juanma Barranquero

Fix typo.

parent 443e60bf
......@@ -1287,7 +1287,7 @@ arguments to `skip-chars-forward'."
(setq diff-string (buffer-substring-no-properties beg end))
(set-buffer out-buffer)
;; Make sure that temp buff syntax table is the same a the original buf
;; Make sure that temp buff syntax table is the same as the original buf
;; syntax tbl, because we use ediff-forward-word in both and
;; ediff-forward-word depends on the syntax classes of characters.
(set-syntax-table inbuf-syntax-tbl)
......
......@@ -821,7 +821,7 @@ This function also returns nil meaning don't specify the indentation."
(parse-partial-sexp (point) calculate-lisp-indent-last-sexp 0 t)
(if (and (elt state 2)
(not (looking-at "\\sw\\|\\s_")))
;; car of form doesn't seem to be a a symbol
;; car of form doesn't seem to be a symbol
(progn
(if (not (> (save-excursion (forward-line 1) (point))
calculate-lisp-indent-last-sexp))
......
......@@ -2156,7 +2156,7 @@ If FORCE is non-nil, the .newsrc file is read."
reads nil)
(if (eolp)
;; If the line ends here, this is clearly a buggy line, so
;; we put point a the beginning of line and let the cond
;; we put point at the beginning of line and let the cond
;; below do the error handling.
(beginning-of-line)
;; We skip to the beginning of the ranges.
......
......@@ -1120,7 +1120,7 @@ Otherwise return nil and don't move point."
(setq done 'succeed)
;; Otherwise, if we skipped a semicolon, we lose.
;; (Exception: we can skip one semicolon before getting
;; to a the last token of the statement, unless that token
;; to the last token of the statement, unless that token
;; is a close brace.)
(if (save-excursion
(forward-sexp 1)
......
......@@ -430,7 +430,7 @@ that variable's value is a string."
(parse-partial-sexp (point) calculate-lisp-indent-last-sexp 0 t)
(if (and (elt state 2)
(not (looking-at "\\sw\\|\\s_")))
;; car of form doesn't seem to be a a symbol
;; car of form doesn't seem to be a symbol
(progn
(if (not (> (save-excursion (forward-line 1) (point))
calculate-lisp-indent-last-sexp))
......
......@@ -31,9 +31,9 @@
;; - Olin Shivers (shivers@cs.cmu.edu)
;; - Simon Marshall (simon@gnu.org)
;; This file defines a a shell-in-a-buffer package (shell mode) built
;; on top of comint mode. This is actually cmushell with things
;; renamed to replace its counterpart in Emacs 18. cmushell is more
;; This file defines a shell-in-a-buffer package (shell mode) built on
;; top of comint mode. This is actually cmushell with things renamed
;; to replace its counterpart in Emacs 18. cmushell is more
;; featureful, robust, and uniform than the Emacs 18 version.
;; Since this mode is built on top of the general command-interpreter-in-
......
......@@ -8603,7 +8603,7 @@ x_scroll_bar_to_input_event (event, ievent)
/* Scroll bar callback for Motif scroll bars. WIDGET is the scroll
bar widget. CLIENT_DATA is a pointer to the scroll_bar structure.
CALL_DATA is a pointer a a XmScrollBarCallbackStruct. */
CALL_DATA is a pointer to a XmScrollBarCallbackStruct. */
static void
xm_scroll_callback (widget, client_data, call_data)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment