changeset 105275:b78ceb253d15

* speedbar.el (speedbar-item-delete): * calc/calc-prog.el (calc-kbd-if): * language/hanja-util.el (hanja-init-load): Fix typos in messages. * epa.el (epa-key-list-mode-map): * hi-lock.el (hi-lock-menu): Fix typos in menus. * progmodes/hideshow.el (hs-allow-nesting): Reflow docstring. (hs-show-hook): Fix typo in docstring.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 29 Sep 2009 02:26:20 +0000
parents 506031e65b65
children 0c6bc9d2b10c
files lisp/ChangeLog lisp/calc/calc-prog.el lisp/epa.el lisp/hi-lock.el lisp/language/hanja-util.el lisp/progmodes/hideshow.el lisp/speedbar.el
diffstat 7 files changed, 20 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Tue Sep 29 02:20:21 2009 +0000
+++ b/lisp/ChangeLog	Tue Sep 29 02:26:20 2009 +0000
@@ -1,3 +1,15 @@
+2009-09-29  Juanma Barranquero  <lekktu@gmail.com>
+
+	* speedbar.el (speedbar-item-delete):
+	* calc/calc-prog.el (calc-kbd-if):
+	* language/hanja-util.el (hanja-init-load): Fix typos in messages.
+
+	* epa.el (epa-key-list-mode-map):
+	* hi-lock.el (hi-lock-menu): Fix typos in menus.
+
+	* progmodes/hideshow.el (hs-allow-nesting): Reflow docstring.
+	(hs-show-hook): Fix typo in docstring.
+
 2009-09-29  Glenn Morris  <rgm@gnu.org>
 
 	* Makefile.in (lisptagsfiles4): New.
--- a/lisp/calc/calc-prog.el	Tue Sep 29 02:20:21 2009 +0000
+++ b/lisp/calc/calc-prog.el	Tue Sep 29 02:26:20 2009 +0000
@@ -1209,7 +1209,7 @@
      (calc-pop-stack 1)
      (if (math-is-true cond)
 	 (if defining-kbd-macro
-	     (message "If true.."))
+	     (message "If true..."))
        (if defining-kbd-macro
 	   (message "Condition is false; skipping to Z: or Z] ..."))
        (calc-kbd-skip-to-else-if t)))))
--- a/lisp/epa.el	Tue Sep 29 02:20:21 2009 +0000
+++ b/lisp/epa.el	Tue Sep 29 02:26:20 2009 +0000
@@ -234,7 +234,7 @@
       '(menu-item "Decrypt File..." epa-decrypt-file
 		  :help "Decrypt FILE"))
     (define-key menu-map [epa-encrypt-file]
-      '(menu-item "Encrypt File.." epa-encrypt-file
+      '(menu-item "Encrypt File..." epa-encrypt-file
 		  :help "Encrypt FILE for RECIPIENTS"))
     (define-key menu-map [separator-epa-key-list] '(menu-item "--"))
     (define-key menu-map [epa-key-list-delete-keys]
--- a/lisp/hi-lock.el	Tue Sep 29 02:20:21 2009 +0000
+++ b/lisp/hi-lock.el	Tue Sep 29 02:26:20 2009 +0000
@@ -253,7 +253,7 @@
 
 (define-key-after hi-lock-menu [highlight-lines-matching-regexp]
   '(menu-item "Highlight Lines..." highlight-lines-matching-regexp
-              :help "Highlight lines containing match of PATTERN (a regexp).."))
+              :help "Highlight lines containing match of PATTERN (a regexp)."))
 
 (define-key-after hi-lock-menu [unhighlight-regexp]
   '(menu-item "Remove Highlighting..." unhighlight-regexp
--- a/lisp/language/hanja-util.el	Tue Sep 29 02:20:21 2009 +0000
+++ b/lisp/language/hanja-util.el	Tue Sep 29 02:26:20 2009 +0000
@@ -39,7 +39,7 @@
 (defun hanja-init-load ()
   "Initialize `hanja-table' (which see)."
   (when (not hanja-table)
-    (message "Hanja table loading..")
+    (message "Hanja table loading...")
     (setq hanja-table (make-char-table nil))
     (mapc
      (lambda (x) (aset hanja-table (car x) (cdr x)))
--- a/lisp/progmodes/hideshow.el	Tue Sep 29 02:20:21 2009 +0000
+++ b/lisp/progmodes/hideshow.el	Tue Sep 29 02:26:20 2009 +0000
@@ -304,8 +304,8 @@
 
 (defvar hs-allow-nesting nil
   "*If non-nil, hiding remembers internal blocks.
-This means that when the outer block is shown again, any
-previously hidden internal blocks remain hidden.")
+This means that when the outer block is shown again,
+any previously hidden internal blocks remain hidden.")
 
 (defvar hs-hide-hook nil
   "*Hook called (with `run-hooks') at the end of commands to hide text.
@@ -315,7 +315,7 @@
 (defvar hs-show-hook nil
   "*Hook called (with `run-hooks') at the end of commands to show text.
 These commands include the toggling commands (when the result is to show
-a block), `hs-show-all' and `hs-show-block'..")
+a block), `hs-show-all' and `hs-show-block'.")
 
 (defvar hs-set-up-overlay nil
   "*Function called with one arg, OV, a newly initialized overlay.
--- a/lisp/speedbar.el	Tue Sep 29 02:20:21 2009 +0000
+++ b/lisp/speedbar.el	Tue Sep 29 02:26:20 2009 +0000
@@ -1648,7 +1648,7 @@
 	  (if (file-directory-p f)
 	      (delete-directory f)
 	    (delete-file f))
-	  (speedbar-message "Okie dokie..")
+	  (speedbar-message "Okie dokie.")
 	  (let ((p (point)))
 	    (speedbar-refresh)
 	    (goto-char p))