Mercurial > emacs

changeset 107150:b6358fb91b0b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix typos.
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 14 Feb 2010 18:34:09 +0100
parents 541b767fb366 (current diff) 907ba0dc2be7 (diff)
children 7e66e7efd47d 70d9e7f7518f 260c94ced579
files
diffstat 15 files changed, 47 insertions(+), 29 deletions(-) [+]
line wrap: on
line diff
--- a/admin/ChangeLog	Sun Feb 14 10:23:52 2010 +0100
+++ b/admin/ChangeLog	Sun Feb 14 18:34:09 2010 +0100
@@ -1,3 +1,7 @@
+2010-02-14  Juanma Barranquero  <lekktu@gmail.com>
+
+	* quick-install-emacs (PRUNED): Fix typo in message.
+
 2010-01-20  Glenn Morris  <rgm@gnu.org>
 
 	* revdiff: Remove file that only works with CVS, and isn't really
--- a/admin/quick-install-emacs	Sun Feb 14 10:23:52 2010 +0100
+++ b/admin/quick-install-emacs	Sun Feb 14 18:34:09 2010 +0100
@@ -276,7 +276,7 @@
 	if [ -d $DST/$DIR ]; then
 	  echo Directory $DST/$DIR exists
 	else
-	  echo Directory $DST/$DIR non-existant
+	  echo Directory $DST/$DIR non-existent
 	  if [ "`echo $DIR | egrep -v "$AVOID_PAT"`" ]; then
 	    maybe_mkdir $DST/$DIR
 	  fi
--- a/doc/emacs/ChangeLog	Sun Feb 14 10:23:52 2010 +0100
+++ b/doc/emacs/ChangeLog	Sun Feb 14 18:34:09 2010 +0100
@@ -33,7 +33,7 @@
 
 	* building.texi (Grep Searching): Document zrgrep.
 
-	* mini.texi (Completion Options): Mention `initals' completion style.
+	* mini.texi (Completion Options): Mention `initials' completion style.
 
 2009-12-29  Nick Roberts  <nickrob@snap.net.nz>
 
--- a/lisp/ChangeLog	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/ChangeLog	Sun Feb 14 18:34:09 2010 +0100
@@ -1,3 +1,17 @@
+2010-02-14  Juanma Barranquero  <lekktu@gmail.com>
+
+	* outline.el (outline-head-from-level):
+	* simple.el (with-wrapper-hook):
+	* cedet/ede.el (ede-run-target, project-delete-target)
+	(project-dist-files, ede-name, ede-documentation, ede-parent-project)
+	(ede-adebug-project, ede-adebug-project-parent)
+	(ede-adebug-project-root):
+	* emacs-lisp/elint.el (elint-extra-errors, elint-current-buffer)
+	(elint-defun, elint-buffer-env, elint-top-form-logged)
+	(elint-unbound-variable):
+	* textmodes/reftex-toc.el (reftex-toc-newhead-from-alist):
+	Fix typos in docstrings.
+
 2010-02-14  Michael Albinus  <michael.albinus@gmx.de>
 
 	* files.el (insert-directory): When WILDCARD-REGEXP and
--- a/lisp/ChangeLog.13	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/ChangeLog.13	Sun Feb 14 18:34:09 2010 +0100
@@ -7242,7 +7242,7 @@
 
 	* subr.el (event-modifiers): Use internal-event-symbol-parse-modifiers.
 
-	* pcvs.el (cvs-revert-if-needed): Ignore `unknown' files, since cvs
+	* pcvs.el (cvs-revert-if-needed): Ignore `unknown' files, since CVS
 	did not touch them.
 
 2007-11-15  Jay Belanger  <jay.p.belanger@gmail.com>
--- a/lisp/ChangeLog.8	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/ChangeLog.8	Sun Feb 14 18:34:09 2010 +0100
@@ -4729,7 +4729,7 @@
 
 1999-07-08  Espen Skoglund  <espensk@stud.cs.uit.no>
 
-	* pascal.el (pascal-calculate-indent): Fixed a bug occuring when
+	* pascal.el (pascal-calculate-indent): Fixed a bug occurring when
 	the `end' keyword was in the very beginning of the buffer.
 
 1999-07-08  Richard Stallman  <rms@gnu.org>
--- a/lisp/cedet/ede.el	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/cedet/ede.el	Sun Feb 14 18:34:09 2010 +0100
@@ -1155,7 +1155,7 @@
   (ede-invoke-method 'project-debug-target))
 
 (defun ede-run-target ()
-  "Debug the current buffer's assocated target."
+  "Run the current buffer's associated target."
   (interactive)
   (ede-invoke-method 'project-run-target))
 
@@ -1381,7 +1381,7 @@
   (error "New-target-custom not supported by %s" (object-name proj)))
 
 (defmethod project-delete-target ((ot ede-target))
-  "Delete the current target OT from it's parent project."
+  "Delete the current target OT from its parent project."
   (error "add-file not supported by %s" (object-name ot)))
 
 (defmethod project-compile-project ((obj ede-project) &optional command)
@@ -1407,7 +1407,7 @@
   (error "Make-dist not supported by %s" (object-name this)))
 
 (defmethod project-dist-files ((this ede-project))
-  "Return a list of files that constitutes a distribution of THIS project."
+  "Return a list of files that constitute a distribution of THIS project."
   (error "Dist-files is not supported by %s" (object-name this)))
 
 (defmethod project-rescan ((this ede-project))
@@ -1421,7 +1421,7 @@
 ;; b) cosmetic.
 
 (defmethod ede-name ((this ede-target))
-  "Return the name of THIS targt."
+  "Return the name of THIS target."
   (oref this name))
 
 (defmethod ede-target-name ((this ede-target))
@@ -1510,7 +1510,7 @@
 	(ede-buffer-documentation-files cp (current-buffer))))))
 
 (defmethod ede-documentation ((this ede-project))
-  "Return a list of files that provides documentation.
+  "Return a list of files that provide documentation.
 Documentation is not for object THIS, but is provided by THIS for other
 files in the project."
   (let ((targ (oref this targets))
@@ -1525,7 +1525,7 @@
     found))
 
 (defmethod ede-documentation ((this ede-target))
-  "Return a list of files that provides documentation.
+  "Return a list of files that provide documentation.
 Documentation is not for object THIS, but is provided by THIS for other
 files in the project."
   nil)
@@ -1651,7 +1651,7 @@
 
 (defun ede-parent-project (&optional obj)
   "Return the project belonging to the parent directory.
-nil if there is no previous directory.
+Returns nil if there is no previous directory.
 Optional argument OBJ is an object to find the parent of."
   (let* ((proj (or obj ede-object-project)) ;; Current project.
 	 (root (if obj (ede-project-root obj)
@@ -1952,7 +1952,7 @@
 ;;; Debugging.
 
 (defun ede-adebug-project ()
-  "Run adebug against the current ede project.
+  "Run adebug against the current EDE project.
 Display the results as a debug list."
   (interactive)
   (require 'data-debug)
@@ -1962,7 +1962,7 @@
     ))
 
 (defun ede-adebug-project-parent ()
-  "Run adebug against the current ede parent project.
+  "Run adebug against the current EDE parent project.
 Display the results as a debug list."
   (interactive)
   (require 'data-debug)
@@ -1972,7 +1972,7 @@
     ))
 
 (defun ede-adebug-project-root ()
-  "Run adebug against the current ede parent project.
+  "Run adebug against the current EDE parent project.
 Display the results as a debug list."
   (interactive)
   (require 'data-debug)
@@ -1983,7 +1983,7 @@
 
 ;;; Hooks & Autoloads
 ;;
-;;  These let us watch various activities, and respond apropriatly.
+;;  These let us watch various activities, and respond appropriately.
 
 ;; (add-hook 'edebug-setup-hook
 ;; 	  (lambda ()
--- a/lisp/cedet/semantic/complete.el	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/cedet/semantic/complete.el	Sun Feb 14 18:34:09 2010 +0100
@@ -1243,7 +1243,7 @@
 ;; A typical displayor accepts a pre-determined list of completions
 ;; generated by a collector.  This format is in semanticdb search
 ;; form.  This vaguely standard form is a bit challenging to navigate
-;; because the tags do not contain buffer info, but the file assocated
+;; because the tags do not contain buffer info, but the file associated
 ;; with the tags preceed the tag in the list.
 ;;
 ;; Basic displayors don't care, and can strip the results.
--- a/lisp/cedet/srecode/insert.el	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/cedet/srecode/insert.el	Sun Feb 14 18:34:09 2010 +0100
@@ -190,7 +190,7 @@
 
 ;;; TEMPLATE ARGUMENTS
 ;;
-;; Some templates have arguments.  Each argument is assocaited with
+;; Some templates have arguments.  Each argument is associated with
 ;; a function that can resolve the inputs needed.
 (defun srecode-resolve-arguments (temp dict)
   "Resolve all the arguments needed by the template TEMP.
--- a/lisp/emacs-lisp/elint.el	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/emacs-lisp/elint.el	Sun Feb 14 18:34:09 2010 +0100
@@ -147,7 +147,7 @@
   "Those built-ins for which we can't find arguments, if any.")
 
 (defvar elint-extra-errors '(file-locked file-supersession ftp-error)
-  "Errors without error-message or error-confitions properties.")
+  "Errors without `error-message' or `error-conditions' properties.")
 
 (defconst elint-preloaded-skip-re
   (regexp-opt '("loaddefs.el" "loadup.el" "cus-start" "language/"
@@ -289,7 +289,7 @@
 ;;;###autoload
 (defun elint-current-buffer ()
   "Lint the current buffer.
-If necessary, this first calls `elint-initalize'."
+If necessary, this first calls `elint-initialize'."
   (interactive)
   (or elint-builtin-variables
       (elint-initialize))
@@ -308,7 +308,7 @@
 ;;;###autoload
 (defun elint-defun ()
   "Lint the function at point.
-If necessary, this first calls `elint-initalize'."
+If necessary, this first calls `elint-initialize'."
   (interactive)
   (or elint-builtin-variables
       (elint-initialize))
@@ -325,7 +325,7 @@
 ;;;
 
 (defvar elint-buffer-env nil
-  "The environment of a elisp buffer.
+  "The environment of an elisp buffer.
 Will be local in linted buffers.")
 
 (defvar elint-buffer-forms nil
@@ -528,7 +528,7 @@
   "The currently linted top form, or nil.")
 
 (defvar elint-top-form-logged nil
-  "T if the currently linted top form has been mentioned in the log buffer.")
+  "The value t if the currently linted top form has been mentioned in the log buffer.")
 
 (defun elint-top-form (form)
   "Lint a top FORM."
@@ -640,7 +640,7 @@
   "Name of a temporarily bound symbol.")
 
 (defun elint-unbound-variable (var env)
-  "T if VAR is unbound in ENV."
+  "Return t if VAR is unbound in ENV."
   ;; #1063 suggests adding (symbol-file var) here, but I don't think
   ;; this is right, because it depends on what files you happen to have
   ;; loaded at the time, which might not be the same when the code runs.
--- a/lisp/org/ChangeLog	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/org/ChangeLog	Sun Feb 14 18:34:09 2010 +0100
@@ -748,7 +748,7 @@
 	next clock in, the user will be prompted to see if they want to
 	back-date their new clock to then.
 	(org-clock-resolve): Do not jump the user to the location of a
-	dangling clock if the resolution is occuring due to an idle
+	dangling clock if the resolution is occurring due to an idle
 	timeout.  In that case there is typically only one dangling clock,
 	the active one, and there is no value gained by shuffling their
 	windows around to show it to them.  Being prompted to resolve an
--- a/lisp/outline.el	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/outline.el	Sun Feb 14 18:34:09 2010 +0100
@@ -595,7 +595,7 @@
 ALIST defaults to `outline-heading-alist'.
 Similar to (car (rassoc LEVEL ALIST)).
 If there are several different entries with same new level, choose
-the one with the smallest distance to the assocation of HEAD in the alist.
+the one with the smallest distance to the association of HEAD in the alist.
 This makes it possible for promotion to work in modes with several
 independent sets of headings (numbered, unnumbered, appendix...)"
   (unless alist (setq alist outline-heading-alist))
--- a/lisp/simple.el	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/simple.el	Sun Feb 14 18:34:09 2010 +0100
@@ -6552,7 +6552,7 @@
 a hook, with a buffer-local and a global part.  But it can also be an
 arbitrary expression.
 ARGS is a list of variables which will be passed as additional arguments
-to each function, after the inital argument, and which the first argument
+to each function, after the initial argument, and which the first argument
 expects to receive when called."
   (declare (indent 2) (debug t))
   ;; We need those two gensyms because CL's lexical scoping is not available
--- a/lisp/textmodes/reftex-toc.el	Sun Feb 14 10:23:52 2010 +0100
+++ b/lisp/textmodes/reftex-toc.el	Sun Feb 14 18:34:09 2010 +0100
@@ -723,8 +723,8 @@
 (defun reftex-toc-newhead-from-alist (nlevel head alist)
   "Get new heading with level NLEVEL from ALIST.
 If there are no such entries, return nil.
-If there are several different entries with same new level, choose
-the one with the smallest distance to the assocation of HEAD in the alist.
+If there are several different entries with same new level, choose the
+one with the smallest distance to the association of HEAD in the alist.
 This makes it possible for promotion to work several sets of headings,
 if these sets are sorted blocks in the alist."
   (let* ((al alist)
--- a/src/ccl.c	Sun Feb 14 10:23:52 2010 +0100
+++ b/src/ccl.c	Sun Feb 14 18:34:09 2010 +0100
@@ -43,7 +43,7 @@
 /* Alist of fontname patterns vs corresponding CCL program.  */
 Lisp_Object Vfont_ccl_encoder_alist;
 
-/* This symbol is a property which assocates with ccl program vector.
+/* This symbol is a property which associates with ccl program vector.
    Ex: (get 'ccl-big5-encoder 'ccl-program) returns ccl program vector.  */
 Lisp_Object Qccl_program;