Commit 99d99081 authored by Paul Eggert's avatar Paul Eggert
Browse files

Spelling fixes.

parent 3771cb17
...@@ -298,7 +298,7 @@ VALUE is a value, or range of values to match against. For ...@@ -298,7 +298,7 @@ VALUE is a value, or range of values to match against. For
example, a SYMBOL might need to match \"foo\". Some TYPES will not example, a SYMBOL might need to match \"foo\". Some TYPES will not
have matching criteria. have matching criteria.
LAMBDA is a lambda expression which is evaled with the text of the LAMBDA is a lambda expression which is evalled with the text of the
type when it is found. It is passed the list of all buffer text type when it is found. It is passed the list of all buffer text
elements found since the last lambda expression. It should return a elements found since the last lambda expression. It should return a
semantic element (see below.) semantic element (see below.)
......
...@@ -66,7 +66,7 @@ ...@@ -66,7 +66,7 @@
;; Other Goals ;; Other Goals
%start FormalParameterList %start FormalParameterList
;; with the terminals stuff, I used the javacript.y names, ;; with the terminals stuff, I used the javascript.y names,
;; but the semantic/wisent/java-tags.wy types ;; but the semantic/wisent/java-tags.wy types
;; when possible ;; when possible
;; ------------------ ;; ------------------
......
...@@ -337,7 +337,6 @@ fset ...@@ -337,7 +337,6 @@ fset
fstab fstab
ftp ftp
fu fu
funtions
garbles garbles
gc gc
gcpro gcpro
......
...@@ -669,7 +669,7 @@ We have already used the routine info display in the first part of this ...@@ -669,7 +669,7 @@ We have already used the routine info display in the first part of this
tutorial. This was the invoked using @kbd{C-c ?}, and displays tutorial. This was the invoked using @kbd{C-c ?}, and displays
information about the IDL routine near the cursor position. Wouldn't it information about the IDL routine near the cursor position. Wouldn't it
be nice to have the same kind of information available for your own be nice to have the same kind of information available for your own
routines and for the huge amount of code in major libraries like JHUPL routines and for the huge amount of code in major libraries like JHUAPL
or the IDL-Astro library? In many cases, you may already have this or the IDL-Astro library? In many cases, you may already have this
information. Files named @file{.idlwave_catalog} in library directories information. Files named @file{.idlwave_catalog} in library directories
contain scanned information on the routines in that directory; many contain scanned information on the routines in that directory; many
......
...@@ -6114,7 +6114,7 @@ When you have edited both buffers as you wish, merge them with C-x 6 ...@@ -6114,7 +6114,7 @@ When you have edited both buffers as you wish, merge them with C-x 6
1. This copies the text from the right-hand buffer as a second column 1. This copies the text from the right-hand buffer as a second column
in the other buffer. To go back to two-column editing, use C-x 6 s. in the other buffer. To go back to two-column editing, use C-x 6 s.
Use C-x 6 d to disassociate the two buffers, leaving each as it Use C-x 6 d to dissociate the two buffers, leaving each as it
stands. (If the other buffer, the one that was not current when you stands. (If the other buffer, the one that was not current when you
type C-x 6 d, is empty, C-x 6 d kills it.) type C-x 6 d, is empty, C-x 6 d kills it.)
......
...@@ -1895,7 +1895,7 @@ ...@@ -1895,7 +1895,7 @@
* Makefile.in (${TIT}): To byte-compile quail packages, use just * Makefile.in (${TIT}): To byte-compile quail packages, use just
built quail. built quail.
1997-12-09 Koaunghi Un <koanughi.un@zdv.uni-tuebingen.de> 1997-12-09 Koaunghi Un <koaunghi.un@zdv.uni-tuebingen.de>
* quail/hanja3.el: New file. * quail/hanja3.el: New file.
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
;; Copyright (C) 1997, 1999, 2001-2011 Free Software Foundation, Inc. ;; Copyright (C) 1997, 1999, 2001-2011 Free Software Foundation, Inc.
;; Author: Koaunghi Un <koanughi.un@zdv.uni-tuebingen.de> ;; Author: Koaunghi Un <koaunghi.un@zdv.uni-tuebingen.de>
;; Keywords: mule, quail, multilingual, input method, Korean, Hanja ;; Keywords: mule, quail, multilingual, input method, Korean, Hanja
;; This file is part of GNU Emacs. ;; This file is part of GNU Emacs.
......
...@@ -18459,7 +18459,7 @@ ...@@ -18459,7 +18459,7 @@
reveal-open-spots, so as to be more reliable. There were several reveal-open-spots, so as to be more reliable. There were several
tricky corner cases where an open spot might be lost, or where tricky corner cases where an open spot might be lost, or where
a closed spot might end up on the list of open spots. a closed spot might end up on the list of open spots.
Only reveal text that's ellipsised. Only reveal text that's ellipsized.
   
2005-11-07 Carsten Dominik <dominik@science.uva.nl> 2005-11-07 Carsten Dominik <dominik@science.uva.nl>
   
...@@ -3334,7 +3334,7 @@ coordinating with allout activity.") ...@@ -3334,7 +3334,7 @@ coordinating with allout activity.")
(run-hooks 'allout-post-undo-hook) (run-hooks 'allout-post-undo-hook)
(cond ((and (= buffer-saved-size -1) (cond ((and (= buffer-saved-size -1)
allout-auto-save-temporarily-disabled) allout-auto-save-temporarily-disabled)
;; user possibly undid a decryption, deinhibit auto-save: ;; user possibly undid a decryption, disinhibit auto-save:
(allout-maybe-resume-auto-save-info-after-encryption)) (allout-maybe-resume-auto-save-info-after-encryption))
((save-excursion ((save-excursion
(save-restriction (save-restriction
...@@ -5871,7 +5871,7 @@ encryption. ...@@ -5871,7 +5871,7 @@ encryption.
Further, encrypting with a KEYMODE-CUE universal argument greater Further, encrypting with a KEYMODE-CUE universal argument greater
than 4 - eg, preceded by a doubled Ctrl-U - causes association of than 4 - eg, preceded by a doubled Ctrl-U - causes association of
the specified recipients with the file, replacing those currently the specified recipients with the file, replacing those currently
associated with it. This can be used to deassociate any associated with it. This can be used to dissociate any
recipients with the file, by selecting no recipients in the recipients with the file, by selecting no recipients in the
dialog. dialog.
...@@ -5912,7 +5912,7 @@ encryption. ...@@ -5912,7 +5912,7 @@ encryption.
Further, encrypting with a KEYMODE-CUE universal argument greater Further, encrypting with a KEYMODE-CUE universal argument greater
than 4 - eg, preceded by a doubled Ctrl-U - causes association of than 4 - eg, preceded by a doubled Ctrl-U - causes association of
the specified recipients with the file, replacing those currently the specified recipients with the file, replacing those currently
associated with it. This can be used to deassociate any associated with it. This can be used to dissociate any
recipients with the file, by selecting no recipients in the recipients with the file, by selecting no recipients in the
dialog. dialog.
...@@ -6045,7 +6045,7 @@ encryption. ...@@ -6045,7 +6045,7 @@ encryption.
Further, encrypting with a KEYMODE-CUE universal argument greater Further, encrypting with a KEYMODE-CUE universal argument greater
than 4 - eg, preceded by a doubled Ctrl-U - causes association of than 4 - eg, preceded by a doubled Ctrl-U - causes association of
the specified recipients with the file, replacing those currently the specified recipients with the file, replacing those currently
associated with it. This can be used to deassociate any associated with it. This can be used to dissociate any
recipients with the file, by selecting no recipients in the recipients with the file, by selecting no recipients in the
dialog. dialog.
...@@ -6661,7 +6661,7 @@ To ignore intangibility, bind `inhibit-point-motion-hooks' to t." ...@@ -6661,7 +6661,7 @@ To ignore intangibility, bind `inhibit-point-motion-hooks' to t."
(if (/= arg 1) (if (/= arg 1)
(condition-case nil (line-move (1- arg)) (error nil))) (condition-case nil (line-move (1- arg)) (error nil)))
;; Move to beginning-of-line, ignoring fields and invisibles. ;; Move to beginning-of-line, ignoring fields and invisible text.
(skip-chars-backward "^\n") (skip-chars-backward "^\n")
(while (and (not (bobp)) (while (and (not (bobp))
(let ((prop (let ((prop
......
...@@ -1060,11 +1060,11 @@ If the result is a list or vector, then use the data debugger to display it." ...@@ -1060,11 +1060,11 @@ If the result is a list or vector, then use the data debugger to display it."
(setq values (cons (eval expr) values)) (setq values (cons (eval expr) values))
(let ((old-value (make-symbol "t")) new-value) (let ((old-value (make-symbol "t")) new-value)
;; Bind debug-on-error to something unique so that we can ;; Bind debug-on-error to something unique so that we can
;; detect when evaled code changes it. ;; detect when evalled code changes it.
(let ((debug-on-error old-value)) (let ((debug-on-error old-value))
(setq values (cons (eval expr) values)) (setq values (cons (eval expr) values))
(setq new-value debug-on-error)) (setq new-value debug-on-error))
;; If evaled code has changed the value of debug-on-error, ;; If evalled code has changed the value of debug-on-error,
;; propagate that change to the global binding. ;; propagate that change to the global binding.
(unless (eq old-value new-value) (unless (eq old-value new-value)
(setq debug-on-error new-value)))) (setq debug-on-error new-value))))
......
...@@ -70,7 +70,7 @@ ...@@ -70,7 +70,7 @@
(let ((pentry (nth idx pf)) (let ((pentry (nth idx pf))
(ptentry (nth idx pft))) (ptentry (nth idx pft)))
(if (or (stringp pentry) (not ptentry)) (if (or (stringp pentry) (not ptentry))
;; Found someting ok. stop ;; Found something ok. Stop.
(setq stop t) (setq stop t)
(setq idx (1+ idx))))) (setq idx (1+ idx)))))
;; We found the first non-tag entry. What is the situation? ;; We found the first non-tag entry. What is the situation?
......
...@@ -2637,7 +2637,7 @@ If FORM is a lambda or a macro, byte-compile it as a function." ...@@ -2637,7 +2637,7 @@ If FORM is a lambda or a macro, byte-compile it as a function."
(setq form (cdr form))) (setq form (cdr form)))
(setq form (car form))) (setq form (car form)))
(if (and (eq (car-safe form) 'list) (if (and (eq (car-safe form) 'list)
;; The spec is evaled in callint.c in dynamic-scoping ;; The spec is evalled in callint.c in dynamic-scoping
;; mode, so just leaving the form unchanged would mean ;; mode, so just leaving the form unchanged would mean
;; it won't be eval'd in the right mode. ;; it won't be eval'd in the right mode.
(not lexical-binding)) (not lexical-binding))
......
...@@ -294,7 +294,7 @@ If a number, only buffers greater than this size have fontification messages." ...@@ -294,7 +294,7 @@ If a number, only buffers greater than this size have fontification messages."
;; and they give users another mechanism for changing face appearance. ;; and they give users another mechanism for changing face appearance.
;; We now allow a FACENAME in `font-lock-keywords' to be any expression that ;; We now allow a FACENAME in `font-lock-keywords' to be any expression that
;; returns a face. So the easiest thing is to continue using these variables, ;; returns a face. So the easiest thing is to continue using these variables,
;; rather than sometimes evaling FACENAME and sometimes not. sm. ;; rather than sometimes evalling FACENAME and sometimes not. sm.
;; Note that in new code, in the vast majority of cases there is no ;; Note that in new code, in the vast majority of cases there is no
;; need to create variables that specify face names. Simply using ;; need to create variables that specify face names. Simply using
......
...@@ -21339,7 +21339,7 @@ ...@@ -21339,7 +21339,7 @@
(gnus-agent-cat-groups): Use eval-and-compile, not (gnus-agent-cat-groups): Use eval-and-compile, not
eval-when-compile, to define gnus-agent-set-cat-groups as the setf eval-when-compile, to define gnus-agent-set-cat-groups as the setf
method of gnus-agent-cat-groups even when the buffer has been method of gnus-agent-cat-groups even when the buffer has been
evaled. evalled.
(gnus-agent-save-active, gnus-agent-save-active-1): Merge to (gnus-agent-save-active, gnus-agent-save-active-1): Merge to
delete gnus-agent-save-active-1. delete gnus-agent-save-active-1.
(gnus-agent-save-groups): Delete. Identical to (gnus-agent-save-groups): Delete. Identical to
......
...@@ -669,7 +669,7 @@ non-nil. ...@@ -669,7 +669,7 @@ non-nil.
If the match is a string, it is used as a regexp match on the If the match is a string, it is used as a regexp match on the
article. If the match is a symbol, that symbol will be funcalled article. If the match is a symbol, that symbol will be funcalled
from the buffer of the article to be saved with the newsgroup as the from the buffer of the article to be saved with the newsgroup as the
parameter. If it is a list, it will be evaled in the same buffer. parameter. If it is a list, it will be evalled in the same buffer.
If this form or function returns a string, this string will be used as a If this form or function returns a string, this string will be used as a
possible file name; and if it returns a non-nil list, that list will be possible file name; and if it returns a non-nil list, that list will be
......
...@@ -1784,7 +1784,7 @@ this is a reply." ...@@ -1784,7 +1784,7 @@ this is a reply."
(and header (and header
(string-match (nth 2 match) header))))))) (string-match (nth 2 match) header)))))))
(t (t
;; This is a form to be evaled. ;; This is a form to be evalled.
(eval match))))) (eval match)))))
;; We have a match, so we set the variables. ;; We have a match, so we set the variables.
(dolist (attribute style) (dolist (attribute style)
......
...@@ -52,7 +52,7 @@ text properties. This is only needed on XEmacs, as Emacs does this anyway." ...@@ -52,7 +52,7 @@ text properties. This is only needed on XEmacs, as Emacs does this anyway."
(defvar gnus-group-indentation "") (defvar gnus-group-indentation "")
;; Format specs. The chunks below are the machine-generated forms ;; Format specs. The chunks below are the machine-generated forms
;; that are to be evaled as the result of the default format strings. ;; that are to be evalled as the result of the default format strings.
;; We write them in here to get them byte-compiled. That way the ;; We write them in here to get them byte-compiled. That way the
;; default actions will be quite fast, while still retaining the full ;; default actions will be quite fast, while still retaining the full
;; flexibility of the user-defined format specs. ;; flexibility of the user-defined format specs.
...@@ -690,7 +690,7 @@ are supported for %s." ...@@ -690,7 +690,7 @@ are supported for %s."
(not (and (featurep 'xemacs) (not (and (featurep 'xemacs)
gnus-use-correct-string-widths))) gnus-use-correct-string-widths)))
(insert (number-to-string pad-width))) (insert (number-to-string pad-width)))
;; Create the form to be evaled. ;; Create the form to be evalled.
(if (or max-width cut-width ignore-value (if (or max-width cut-width ignore-value
(and (featurep 'xemacs) (and (featurep 'xemacs)
gnus-use-correct-string-widths)) gnus-use-correct-string-widths))
......
...@@ -242,7 +242,7 @@ See the Gnus manual for an explanation of the syntax used.") ...@@ -242,7 +242,7 @@ See the Gnus manual for an explanation of the syntax used.")
(let* ((current-window (or (get-buffer-window (current-buffer)) (selected-window))) (let* ((current-window (or (get-buffer-window (current-buffer)) (selected-window)))
(window (or window current-window))) (window (or window current-window)))
(select-window window) (select-window window)
;; The SPLIT might be something that is to be evaled to ;; The SPLIT might be something that is to be evalled to
;; return a new SPLIT. ;; return a new SPLIT.
(while (and (not (assq (car split) gnus-window-to-buffer)) (while (and (not (assq (car split) gnus-window-to-buffer))
(symbolp (car split)) (fboundp (car split))) (symbolp (car split)) (fboundp (car split)))
...@@ -447,7 +447,7 @@ should have point." ...@@ -447,7 +447,7 @@ should have point."
(when (consp (car split)) (when (consp (car split))
(push 1.0 split) (push 1.0 split)
(push 'vertical split)) (push 'vertical split))
;; The SPLIT might be something that is to be evaled to ;; The SPLIT might be something that is to be evalled to
;; return a new SPLIT. ;; return a new SPLIT.
(while (and (not (assq (car split) gnus-window-to-buffer)) (while (and (not (assq (car split) gnus-window-to-buffer))
(symbolp (car split)) (fboundp (car split))) (symbolp (car split)) (fboundp (car split)))
......
...@@ -4409,7 +4409,7 @@ This function could be useful in `message-setup-hook'." ...@@ -4409,7 +4409,7 @@ This function could be useful in `message-setup-hook'."
;; A simple function. ;; A simple function.
((functionp action) ((functionp action)
(funcall action)) (funcall action))
;; Something to be evaled. ;; Something to be evalled.
(t (t
(eval action)))))) (eval action))))))
......
...@@ -320,7 +320,7 @@ The value is a vector [INDEX HEADER TAGLINE BODY END], where ...@@ -320,7 +320,7 @@ The value is a vector [INDEX HEADER TAGLINE BODY END], where
(setq index 2)) (setq index 2))
;; If the tagline is displayed, get past it to the body. ;; If the tagline is displayed, get past it to the body.
(if (rmail-mime-display-tagline current) (if (rmail-mime-display-tagline current)
;; The next foward-line call must be in sync with how ;; The next forward-line call must be in sync with how
;; `rmail-mime-insert-tagline' formats the tagline. The ;; `rmail-mime-insert-tagline' formats the tagline. The
;; body begins after the empty line that ends the tagline. ;; body begins after the empty line that ends the tagline.
(forward-line 3)) (forward-line 3))
......
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