changeset 629:a6c89d799f00

[xemacs-hg @ 2001-07-15 08:18:59 by adrian] [PATCH] xemacs-21.5: typo fixes of of this this nature for lisp/ <8zhqhahu.fsf@ecf.teradyne.com>
author adrian
date Sun, 15 Jul 2001 08:18:59 +0000
parents e545f3ec2337
children ff9d7f21f8d0
files lisp/ChangeLog lisp/about.el lisp/dialog.el lisp/lisp-mode.el lisp/package-admin.el lisp/package-get.el
diffstat 6 files changed, 14 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sat Jul 14 08:42:17 2001 +0000
+++ b/lisp/ChangeLog	Sun Jul 15 08:18:59 2001 +0000
@@ -1,3 +1,11 @@
+2001-07-15  Adrian Aichner  <adrian@xemacs.org>
+
+	* about.el (about-personal-info): Fix word duplication typos.
+	* dialog.el (make-dialog-box): Ditto.
+	* lisp-mode.el (lisp-indent-function): Ditto.
+	* package-admin.el (package-admin-delete-binary-package): Ditto.
+	* package-get.el (package-get-staging-dir): Ditto.
+
 2001-07-14  Sean MacLennan  <seanm@storm.ca>
 
 	* package-admin.el (package-install-hook): New.
--- a/lisp/about.el	Sat Jul 14 08:42:17 2001 +0000
+++ b/lisp/about.el	Sun Jul 15 08:18:59 2001 +0000
@@ -1224,7 +1224,7 @@
     (pelegri
      (widget-insert
       "\
-I did my my PhD at UCB and a postdoc at CSL/PARC.  I joined Sun in 1990,
+I did my PhD at UCB and a postdoc at CSL/PARC.  I joined Sun in 1990,
 spent some time in DevPro (that is when I made my contribution to
 XEmacs) and joined JavaSoft in fall '95, where I've been the lead for
 several JSP-related specifications and JAX-RPC.  I'm currently the Web
--- a/lisp/dialog.el	Sat Jul 14 08:42:17 2001 +0000
+++ b/lisp/dialog.el	Sun Jul 15 08:18:59 2001 +0000
@@ -290,7 +290,7 @@
 name can change as a result of selecting a different printer device.  If
 a device is specified, then changes are stored into the settings object
 currently selected into that printer.  If a settings object is supplied,
-then changes are recorded into it, and, it it is selected into a
+then changes are recorded into it, and, it is selected into a
 printer, then changes are propagated to that printer 
 too.
 
@@ -338,7 +338,7 @@
 Connection name can change as a result of selecting a different printer
 device.  If a device is specified, then changes are stored into the
 settings object currently selected into that printer.  If a settings
-object is supplied, then changes are recorded into it, and, it it is
+object is supplied, then changes are recorded into it, and, it is
 selected into a printer, then changes are propagated to that printer
 too.
 
--- a/lisp/lisp-mode.el	Sat Jul 14 08:42:17 2001 +0000
+++ b/lisp/lisp-mode.el	Sun Jul 15 08:18:59 2001 +0000
@@ -677,7 +677,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))
--- a/lisp/package-admin.el	Sat Jul 14 08:42:17 2001 +0000
+++ b/lisp/package-admin.el	Sun Jul 15 08:18:59 2001 +0000
@@ -439,7 +439,7 @@
 		  ;; Make sure that the file is writable.
 		  ;; (This is important under MS Windows.)
 		  ;; I do not know why it important under MS Windows but
-		  ;;    1. It bombs out out when the file does not exist. This can be condition-cased
+		  ;;    1. It bombs out when the file does not exist. This can be condition-cased
 		  ;;    2. If I removed the write permissions, I do not want XEmacs to just ignore them.
 		  ;;       If it wants to, XEmacs may ask, but that is about all
 		  ;; (set-file-modes file 438) ;; 438 -> #o666
--- a/lisp/package-get.el	Sat Jul 14 08:42:17 2001 +0000
+++ b/lisp/package-get.el	Sun Jul 15 08:18:59 2001 +0000
@@ -951,7 +951,7 @@
 (defun package-get-staging-dir (filename)
   "Return a good place to stash FILENAME when it is retrieved.
 Use `package-get-dir' for directory to store stuff.
-Creates `package-get-dir'  it it doesn't exist."
+Creates `package-get-dir'  if it doesn't exist."
   (interactive "FPackage filename: ")
   (if (not (file-exists-p package-get-dir))
       (make-directory package-get-dir))