Mercurial > emacs
changeset 214:a1430f8459e5
*** empty log message ***
| author | Brian Preble <rassilon@gnu.org> |
|---|---|
| date | Tue, 12 Mar 1991 19:57:55 +0000 |
| parents | 9fa9f6071bc1 |
| children | 8b1123702915 |
| files | lisp/emacs-lisp/lisp-mode.el lisp/ledit.el lisp/textmodes/=ispell4.el |
| diffstat | 3 files changed, 12 insertions(+), 12 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp-mode.el Tue Mar 12 19:48:56 1991 +0000 +++ b/lisp/emacs-lisp/lisp-mode.el Tue Mar 12 19:57:55 1991 +0000 @@ -383,7 +383,7 @@ (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)))
--- a/lisp/ledit.el Tue Mar 12 19:48:56 1991 +0000 +++ b/lisp/ledit.el Tue Mar 12 19:57:55 1991 +0000 @@ -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,
--- a/lisp/textmodes/=ispell4.el Tue Mar 12 19:48:56 1991 +0000 +++ b/lisp/textmodes/=ispell4.el Tue Mar 12 19:57:55 1991 +0000 @@ -202,7 +202,7 @@ 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 @@ (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