# HG changeset patch # User Juanma Barranquero # Date 1025697684 0 # Node ID bd315b9fa3f00a91d93fc6e5e930d02c7240d27c # Parent 61df14a62e39cba0b1920cc5b062638311648b40 Fix typo. diff -r 61df14a62e39 -r bd315b9fa3f0 lisp/ediff-diff.el --- a/lisp/ediff-diff.el Wed Jul 03 11:32:20 2002 +0000 +++ b/lisp/ediff-diff.el Wed Jul 03 12:01:24 2002 +0000 @@ -1287,7 +1287,7 @@ (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) diff -r 61df14a62e39 -r bd315b9fa3f0 lisp/emacs-lisp/lisp-mode.el --- a/lisp/emacs-lisp/lisp-mode.el Wed Jul 03 11:32:20 2002 +0000 +++ b/lisp/emacs-lisp/lisp-mode.el Wed Jul 03 12:01:24 2002 +0000 @@ -821,7 +821,7 @@ (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)) diff -r 61df14a62e39 -r bd315b9fa3f0 lisp/gnus/gnus-start.el --- a/lisp/gnus/gnus-start.el Wed Jul 03 11:32:20 2002 +0000 +++ b/lisp/gnus/gnus-start.el Wed Jul 03 12:01:24 2002 +0000 @@ -2156,7 +2156,7 @@ 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. diff -r 61df14a62e39 -r bd315b9fa3f0 lisp/obsolete/c-mode.el --- a/lisp/obsolete/c-mode.el Wed Jul 03 11:32:20 2002 +0000 +++ b/lisp/obsolete/c-mode.el Wed Jul 03 12:01:24 2002 +0000 @@ -1120,7 +1120,7 @@ (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) diff -r 61df14a62e39 -r bd315b9fa3f0 lisp/progmodes/scheme.el --- a/lisp/progmodes/scheme.el Wed Jul 03 11:32:20 2002 +0000 +++ b/lisp/progmodes/scheme.el Wed Jul 03 12:01:24 2002 +0000 @@ -430,7 +430,7 @@ (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)) diff -r 61df14a62e39 -r bd315b9fa3f0 lisp/shell.el --- a/lisp/shell.el Wed Jul 03 11:32:20 2002 +0000 +++ b/lisp/shell.el Wed Jul 03 12:01:24 2002 +0000 @@ -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- diff -r 61df14a62e39 -r bd315b9fa3f0 src/xterm.c --- a/src/xterm.c Wed Jul 03 11:32:20 2002 +0000 +++ b/src/xterm.c Wed Jul 03 12:01:24 2002 +0000 @@ -8603,7 +8603,7 @@ /* 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)