*** empty log message ***

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index d7b26e1461ea44fa4d01feaf83d8204311fa95ae..e9a05c5abca653fa6f0950ebe9e0786b6b3469b8 100644 (file)
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -383,7 +383,7 @@ of the start of the containing expression."
                (or (funcall lisp-indent-function indent-point state)
                    normal-indent))
               (t
-               normal-indent)))))))
+               normal-indent))))))
 
 (defun lisp-indent-function (indent-point state)
   (let ((normal-indent (current-column)))

diff --git a/lisp/ledit.el b/lisp/ledit.el
index 1ab35d5bfb29d9fbc400f2e679b6817b554754ff..0428fa8b2285dc81b3d44352f630305e59962412 100644 (file)
--- a/lisp/ledit.el
+++ b/lisp/ledit.el
@@ -57,19 +57,19 @@
   (message "Region saved for Lisp"))
 
 (defun ledit-zap-defun-to-lisp ()
-  "Carry the current defun to lisp"
+  "Carry the current defun to Lisp."
   (interactive)
   (ledit-save-defun)
   (ledit-go-to-lisp))
 
 (defun ledit-zap-defun-to-liszt ()
-  "Carry the current defun to liszt"
+  "Carry the current defun to liszt."
   (interactive)
   (ledit-save-defun)
   (ledit-go-to-liszt))
 
 (defun ledit-zap-region-to-lisp (beg end)
-  "Carry the current region to lisp"
+  "Carry the current region to Lisp."
   (interactive "r")
   (ledit-save-region beg end)
   (ledit-go-to-lisp))
@@ -104,7 +104,7 @@
   (load ledit-read-file t t))
 
 (defun ledit-setup ()
-  "Set up key bindings for the Lisp / Emacs interface"
+  "Set up key bindings for the Lisp/Emacs interface."
   (if (not ledit-mode-map)
       (progn (setq ledit-mode-map (make-sparse-keymap))
             (lisp-mode-commands ledit-mode-map)))
@@ -116,13 +116,13 @@
 (ledit-setup)
 
 (defun ledit-mode ()
-  "Major mode for editing text and stuffing it to a Lisp job.
+  "\\<ledit-mode-map>Major mode for editing text and stuffing it to a Lisp job.
 Like Lisp mode, plus these special commands:
-  M-C-d        -- record defun at or after point
+  \\[ledit-save-defun] -- record defun at or after point
           for later transmission to Lisp job.
-  M-C-r -- record region for later transmission to Lisp job.
-  C-x z -- transfer to Lisp job and transmit saved text.
-  M-C-c -- transfer to Liszt (Lisp compiler) job
+  \\[ledit-save-region] -- record region for later transmission to Lisp job.
+  \\[ledit-go-to-lisp] -- transfer to Lisp job and transmit saved text.
+  \\[ledit-go-to-liszt] -- transfer to Liszt (Lisp compiler) job
           and transmit saved text.
 \\{ledit-mode-map}
 To make Lisp mode automatically change to Ledit mode,

diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el
index 48737175933648d4d94cf9ed7af5f0bb5ddc4073..782ea43103cfa64d699efa7d547ed1b1054155a7 100644 (file)
--- a/lisp/textmodes/ispell4.el
+++ b/lisp/textmodes/ispell4.el
@@ -202,7 +202,7 @@ l   Lookup.  Look for a word in the dictionary by fast binary
        search, or search for a regular expression in the dictionary
        using grep.
 SPACE  Accept the word this time, but complain if it is seen again.
-q, C-G Leave the command loop.  You can come back later with \\[ispell-next]."
+q, \\[keyboard-quit]   Leave the command loop.  You can come back later with \\[ispell-next]."
   (interactive)
   (if (null start)
       (setq start 0))
@@ -289,7 +289,7 @@ q, C-G      Leave the command loop.  You can come back later with \\[ispell-next]."
 
 (defun ispell-word ()
   "Check the spelling of the word under the cursor.
-See `ispell' for more documentation."
+See `ispell' for more information."
   (interactive)
   (condition-case err
       (catch 'quit