From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Jim Meyering Newsgroups: gmane.emacs.devel Subject: fix many doubled-word typos Date: Tue, 10 May 2011 16:02:32 +0200 Message-ID: <87wrhyy7pj.fsf@rho.meyering.net> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1305036178 15272 80.91.229.12 (10 May 2011 14:02:58 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Tue, 10 May 2011 14:02:58 +0000 (UTC) To: Emacs development discussions Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Tue May 10 16:02:53 2011 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1QJnWU-0000e2-A8 for ged-emacs-devel@m.gmane.org; Tue, 10 May 2011 16:02:50 +0200 Original-Received: from localhost ([::1]:45847 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QJnWT-00019M-SD for ged-emacs-devel@m.gmane.org; Tue, 10 May 2011 10:02:49 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:49999) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QJnWN-00019C-NN for emacs-devel@gnu.org; Tue, 10 May 2011 10:02:48 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QJnWE-0001Dj-Mk for emacs-devel@gnu.org; Tue, 10 May 2011 10:02:43 -0400 Original-Received: from mx.meyering.net ([82.230.74.64]:40044) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QJnWE-0001DZ-74 for emacs-devel@gnu.org; Tue, 10 May 2011 10:02:34 -0400 Original-Received: by rho.meyering.net (Acme Bit-Twister, from userid 1000) id E87716014D; Tue, 10 May 2011 16:02:32 +0200 (CEST) Original-Lines: 378 X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-Received-From: 82.230.74.64 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:139303 Archived-At: FYI, I've just committed this. I see that it didn't use my name, whereas it did before. I would rather have had it reject the commit than use "U. Ser". I'll fix that so it doesn't happen again. ------------------------------------------------------------ revno: 104188 committer: U. Ser branch nick: trunk timestamp: Tue 2011-05-10 15:57:12 +0200 message: fix many doubled-word typos diff: === modified file 'ChangeLog' --- ChangeLog 2011-05-09 10:40:26 +0000 +++ ChangeLog 2011-05-10 13:57:12 +0000 @@ -1,3 +1,34 @@ +2011-05-10 Jim Meyering + + fix doubled-word typos + * admin/notes/exit-value: the the -> the + * doc/lispref/minibuf.texi: in in -> in + * doc/misc/ede.texi: or or -> or + * etc/MH-E-NEWS: the the -> the + * etc/PROBLEMS: Likewise. + * lisp/cedet/ede/pmake.el (ede-proj-makefile-garbage-patterns): Likewise. + * lisp/cedet/semantic/complete.el + (semantic-complete-read-tag-local-members): Likewise. + * lisp/cedet/ede.el (ede-auto-add-method): then then -> then + * lisp/gnus/shr.el (shr-colorize-region): on on -> on + * lisp/international/quail.el (quail-insert-kbd-layout): and and -> and + * lisp/kermit.el: and and -> and + * lisp/mh-e/mh-alias.el (mh-alias-minibuffer-confirm-address): + if if -> if it + * lisp/mh-e/mh-scan.el (mh-scan-destination-width): in in -> in + * lisp/net/ldap.el (ldap-search-internal): to to -> to + * lisp/org/org-agenda.el (org-agenda-entry-types): the the -> the + * lisp/org/org-table.el (org-table-get-remote-range): or or -> or + * lisp/org/org-wl.el (org-wl-folder-type): the the -> the + * lisp/org/org.el (org-goto, org-inside-LaTeX-fragment-p): Likewise. + * lisp/progmodes/vhdl-mode.el (vhdl-offsets-alist): Likewise. + * lisp/progmodes/js.el (js-mode): and and -> and + * lisp/textmodes/artist.el (artist-move-to-xy): at at -> at + (artist-draw-region-trim-line-endings): if if -> if + And Safetyc -> Safety. + * lisp/textmodes/reftex-dcr.el (reftex-view-crossref): at at -> at a + * src/xdisp.c (x_intersect_rectangles): the the -> the + 2011-05-09 Teodor Zlatanov * configure.in: Require GnuTLS 2.6.x or higher. === modified file 'admin/notes/exit-value' --- admin/notes/exit-value 2004-05-12 14:39:34 +0000 +++ admin/notes/exit-value 2011-05-10 13:57:12 +0000 @@ -10,7 +10,7 @@ From the point of view of the program, nowadays stdlib.h on both type of systems provides macros `EXIT_SUCCESS' and `EXIT_FAILURE' that should DTRT. -NB: The numerical values of these macros DO NOT need to fulfill the the exit +NB: The numerical values of these macros DO NOT need to fulfill the exit value requirements outlined in the first paragraph! That is the job of the `exit' function. Thus, this kind of construct shows misunderstanding: === modified file 'doc/lispref/minibuf.texi' --- doc/lispref/minibuf.texi 2011-04-08 18:53:26 +0000 +++ doc/lispref/minibuf.texi 2011-05-10 13:57:12 +0000 @@ -1691,7 +1691,7 @@ @item @code{(boundaries . SUFFIX)} specifies @code{completion-boundaries}. The function should return a value of the form @code{(boundaries -START . END)} where START is the position of the beginning boundary in +START . END)} where START is the position of the beginning boundary in the string to complete, and END is the position of the end boundary in SUFFIX. @end itemize === modified file 'doc/misc/ede.texi' --- doc/misc/ede.texi 2011-04-13 11:58:47 +0000 +++ doc/misc/ede.texi 2011-05-10 13:57:12 +0000 @@ -241,7 +241,7 @@ You can add a file to more than one target; this is OK. To remove the current file from a target, type @kbd{C-c . d} -(@code{ede-remove-file}), or or use the @samp{Remove File} menu item +(@code{ede-remove-file}), or use the @samp{Remove File} menu item in the @samp{Target Options} submenu. If the file belongs to multiple targets, this command prompts for each target it could be removed from. === modified file 'etc/MH-E-NEWS' --- etc/MH-E-NEWS 2011-01-25 04:08:28 +0000 +++ etc/MH-E-NEWS 2011-05-10 13:57:12 +0000 @@ -320,7 +320,7 @@ Most of the changes have to do with the renaming of the functions with "mhn" in them to "mh" because nmh doesn't use `mhn'. The names were -also made consistent with the the family of "mml" functions. +also made consistent with the family of "mml" functions. The type of signing or encryption has been generalized so the method is now an option rather than a part of the function's name. The option === modified file 'etc/PROBLEMS' --- etc/PROBLEMS 2011-01-25 04:08:28 +0000 +++ etc/PROBLEMS 2011-05-10 13:57:12 +0000 @@ -1217,7 +1217,7 @@ 2) If the connection is very slow, you might also want to consider switching off scroll bars, menu bar, and tool bar. Adding the following forms to your .emacs file will accomplish that, but only - after the the initial frame is displayed: + after the initial frame is displayed: (scroll-bar-mode -1) (menu-bar-mode -1) === modified file 'lisp/cedet/ede.el' --- lisp/cedet/ede.el 2011-01-25 04:08:28 +0000 +++ lisp/cedet/ede.el 2011-05-10 13:57:12 +0000 @@ -80,7 +80,7 @@ If the value is 'always, then the new file is added to the first target encountered. If the value is 'multi-ask, then if more than one target wants the file, the user is asked. If only one target wants -the file, then then it is automatically added to that target. If the +the file, then it is automatically added to that target. If the value is 'ask, then the user is always asked, unless there is no target willing to take the file. 'never means never perform the check." :group 'ede === modified file 'lisp/cedet/ede/pmake.el' --- lisp/cedet/ede/pmake.el 2011-01-25 04:08:28 +0000 +++ lisp/cedet/ede/pmake.el 2011-05-10 13:57:12 +0000 @@ -478,7 +478,7 @@ (defmethod ede-proj-makefile-garbage-patterns ((this ede-proj-target)) "Return a list of patterns that are considered garbage to THIS. These are removed with make clean." - ;; Get the the source object from THIS, and use the specified garbage. + ;; Get the source object from THIS, and use the specified garbage. (let ((src (ede-target-sourcecode this)) (garb nil)) (while src === modified file 'lisp/cedet/semantic/complete.el' --- lisp/cedet/semantic/complete.el 2011-02-28 01:07:29 +0000 +++ lisp/cedet/semantic/complete.el 2011-05-10 13:57:12 +0000 @@ -1825,7 +1825,7 @@ initial-input history) "Ask for a tag by name from the local type members. -Available tags are from the the current scope. +Available tags are from the current scope. Completion options are presented in a traditional way, with highlighting to resolve same-name collisions. PROMPT is a string to prompt with. === modified file 'lisp/gnus/shr.el' --- lisp/gnus/shr.el 2011-05-10 13:20:21 +0000 +++ lisp/gnus/shr.el 2011-05-10 13:57:12 +0000 @@ -643,7 +643,7 @@ (shr-put-color start end :background (car new-colors)))) new-colors))) -;; Put a color in the region, but avoid putting colors on on blank +;; Put a color in the region, but avoid putting colors on blank ;; text at the start of the line, and the newline at the end, to avoid ;; ugliness. Also, don't overwrite any existing color information, ;; since this can be called recursively, and we want the "inner" color === modified file 'lisp/international/quail.el' --- lisp/international/quail.el 2011-01-31 23:54:50 +0000 +++ lisp/international/quail.el 2011-05-10 13:57:12 +0000 @@ -818,7 +818,7 @@ (bar "|") lower upper row) ;; Make table without horizontal lines. Each column for a key - ;; has the form "| LU |" where L is for lower key and and U is + ;; has the form "| LU |" where L is for lower key and U is ;; for a upper key. If width of L (U) is greater than 1, ;; preceding (following) space is not inserted. (put-text-property 0 1 'face 'bold bar) === modified file 'lisp/kermit.el' --- lisp/kermit.el 2011-01-25 04:08:28 +0000 +++ lisp/kermit.el 2011-05-10 13:57:12 +0000 @@ -63,7 +63,7 @@ ;; the -c (connect) command line option, which means you also have to specify a ;; line and baud on the command line, as in "kermit -l /dev/tty53 -b 9600 -c". ;; However, this will cause kermit to exit when the connection is closed. So -;; in order to do a file transfer, you have to think ahead and and add -r +;; in order to do a file transfer, you have to think ahead and add -r ;; (receive) to the command line. This means that you can't use the server ;; feature. The only fix I can see is to muck around with the source code for ;; kermit, although this probably wouldn't be too hard. What is needed is an === modified file 'lisp/mh-e/mh-alias.el' --- lisp/mh-e/mh-alias.el 2011-04-28 15:32:28 +0000 +++ lisp/mh-e/mh-alias.el 2011-05-10 13:57:12 +0000 @@ -286,7 +286,7 @@ (the-name (buffer-substring-no-properties beg (point)))) (if (mh-assoc-string the-name mh-alias-alist t) (message "%s -> %s" the-name (mh-alias-expand the-name)) - ;; Check if if was a single word likely to be an alias + ;; Check if it was a single word likely to be an alias (if (and (equal mh-alias-flash-on-comma 1) (not (string-match " " the-name))) (message "No alias for %s" the-name)))))) === modified file 'lisp/mh-e/mh-scan.el' --- lisp/mh-e/mh-scan.el 2011-01-26 08:36:39 +0000 +++ lisp/mh-e/mh-scan.el 2011-05-10 13:57:12 +0000 @@ -308,7 +308,7 @@ in it. \" \" blank space is the default character. - \"%\" indicates that the message in in a named MH sequence. + \"%\" indicates that the message in a named MH sequence. \"-\" indicates that the message has been annotated with a replied field. \"t\" indicates that the message contains mymbox in the To: field. \"c\" indicates that the message contains mymbox in the Cc: field. === modified file 'lisp/net/ldap.el' --- lisp/net/ldap.el 2011-03-13 22:17:17 +0000 +++ lisp/net/ldap.el 2011-05-10 13:57:12 +0000 @@ -498,7 +498,7 @@ matching one will be used. Note the \"port ldap\" part is NOT required. - `host' is a string naming one or more (blank-separated) LDAP servers to + `host' is a string naming one or more (blank-separated) LDAP servers to try to connect to. Each host name may optionally be of the form HOST:PORT. `filter' is a filter string for the search as described in RFC 1558. `attributes' is a list of strings indicating which attributes to retrieve === modified file 'lisp/org/org-agenda.el' --- lisp/org/org-agenda.el 2011-02-28 01:07:29 +0000 +++ lisp/org/org-agenda.el 2011-05-10 13:57:12 +0000 @@ -3370,7 +3370,7 @@ Never set this variable globally using `setq', because then it will apply to all future agenda commands. Instead, bind it with -`let' to scope it dynamically into the the agenda-constructing +`let' to scope it dynamically into the agenda-constructing command. A good way to set it is through options in `org-agenda-custom-commands'. For a more flexible (though somewhat less efficient) way of determining what is included in === modified file 'lisp/org/org-table.el' --- lisp/org/org-table.el 2011-02-28 01:07:29 +0000 +++ lisp/org/org-table.el 2011-05-10 13:57:12 +0000 @@ -4341,7 +4341,7 @@ will then be used. Alternatively, it may be an ID referring to any entry, also in a different file. In this case, the first table in that entry will be referenced. -FORM is a field or range descriptor like \"@2$3\" or or \"B3\" or +FORM is a field or range descriptor like \"@2$3\" or \"B3\" or \"@I$2..@II$2\". All the references must be absolute, not relative. The return value is either a single string for a single field, or a === modified file 'lisp/org/org-wl.el' --- lisp/org/org-wl.el 2011-01-26 08:36:39 +0000 +++ lisp/org/org-wl.el 2011-05-10 13:57:12 +0000 @@ -118,7 +118,7 @@ (defun org-wl-folder-type (folder) "Return symbol that indicates the type of FOLDER. FOLDER is the wanderlust folder name. The first character of the -folder name determines the the folder type." +folder name determines the folder type." (let* ((indicator (substring folder 0 1)) (type (cdr (assoc indicator org-wl-folder-types)))) ;; maybe access or file folder === modified file 'lisp/org/org.el' --- lisp/org/org.el 2011-03-06 02:43:19 +0000 +++ lisp/org/org.el 2011-05-10 13:57:12 +0000 @@ -6496,7 +6496,7 @@ that copy, use org-occur and incremental search to find a location. When pressing RET or `Q', the command returns to the original buffer in which the visibility is still unchanged. After RET is will also jump to -the location selected in the indirect buffer and expose the +the location selected in the indirect buffer and expose the headline hierarchy above." (interactive "P") (let* ((org-refile-targets `((nil . (:maxlevel . ,org-goto-max-level)))) @@ -15746,7 +15746,7 @@ Even though the matchers for math are configurable, this function assumes that \\begin, \\(, \\[, and $$ are always used. Only the single dollar delimiters are skipped when they have been removed by customization. -The return value is nil, or a cons cell with the delimiter and +The return value is nil, or a cons cell with the delimiter and the position of this delimiter. This function does a reasonably good job, but can locally be fooled by === modified file 'lisp/progmodes/js.el' --- lisp/progmodes/js.el 2011-04-22 18:44:26 +0000 +++ lisp/progmodes/js.el 2011-05-10 13:57:12 +0000 @@ -3347,7 +3347,7 @@ ;; Important to fontify the whole buffer syntactically! If we don't, ;; then we might have regular expression literals that aren't marked ;; as strings, which will screw up parse-partial-sexp, scan-lists, - ;; etc. and and produce maddening "unbalanced parenthesis" errors. + ;; etc. and produce maddening "unbalanced parenthesis" errors. ;; When we attempt to find the error and scroll to the portion of ;; the buffer containing the problem, JIT-lock will apply the ;; correct syntax to the regular expresion literal and the problem === modified file 'lisp/progmodes/vhdl-mode.el' --- lisp/progmodes/vhdl-mode.el 2011-02-28 01:07:29 +0000 +++ lisp/progmodes/vhdl-mode.el 2011-05-10 13:57:12 +0000 @@ -1937,7 +1937,7 @@ comment -- a line containing only a comment arglist-intro -- the first line in an argument list arglist-cont -- subsequent argument list lines when no - arguments follow on the same line as the + arguments follow on the same line as the arglist opening paren arglist-cont-nonempty -- subsequent argument list lines when at least one argument follows on the same === modified file 'lisp/textmodes/artist.el' --- lisp/textmodes/artist.el 2011-03-02 03:48:01 +0000 +++ lisp/textmodes/artist.el 2011-05-10 13:57:12 +0000 @@ -1942,7 +1942,7 @@ ;; ;; Example: In the figure below, the `X' is the very last ;; character in the buffer ("a non-empty line at the - ;; end"). Suppose point is at at P. Then (forward-line 1) + ;; end"). Suppose point is at P. Then (forward-line 1) ;; returns 0 and puts point after the `X'. ;; ;; --------top of buffer-------- @@ -4030,7 +4030,7 @@ (defun artist-draw-region-trim-line-endings (min-y max-y) "Trim lines in current draw-region from MIN-Y to MAX-Y. Trimming here means removing white space at end of a line." - ;; Safetyc check: switch min-y and max-y if if max-y is smaller + ;; Safety check: switch min-y and max-y if max-y is smaller (if (< max-y min-y) (let ((tmp min-y)) (setq min-y max-y) === modified file 'lisp/textmodes/reftex-dcr.el' --- lisp/textmodes/reftex-dcr.el 2011-01-25 04:08:28 +0000 +++ lisp/textmodes/reftex-dcr.el 2011-05-10 13:57:12 +0000 @@ -34,7 +34,7 @@ (defun reftex-view-crossref (&optional arg auto-how fail-quietly) "View cross reference of macro at point. Point must be on the KEY -argument. When at at `\\ref' macro, show corresponding `\\label' +argument. When at a `\\ref' macro, show corresponding `\\label' definition, also in external documents (`xr'). When on a label, show a locations where KEY is referenced. Subsequent calls find additional locations. When on a `\\cite', show the associated `\\bibitem' macro or === modified file 'src/xdisp.c' --- src/xdisp.c 2011-04-29 17:56:27 +0000 +++ src/xdisp.c 2011-05-10 13:57:12 +0000 @@ -254,7 +254,7 @@ still left to right, i.e. the iterator "thinks" the first character is at the leftmost pixel position. The iterator does not know that PRODUCE_GLYPHS reverses the order of the glyphs that the iterator - delivers. This is important when functions from the the move_it_* + delivers. This is important when functions from the move_it_* family are used to get to certain screen position or to match screen coordinates with buffer coordinates: these functions use the iterator geometry, which is left to right even in R2L paragraphs. @@ -26254,7 +26254,7 @@ { result->x = right->x; - /* The right end of the intersection is the minimum of the + /* The right end of the intersection is the minimum of the right ends of left and right. */ result->width = (min (left->x + left->width, right->x + right->width) - result->x);