diff options
| author | Brian Preble <rassilon@gnu.org> | 1991-04-10 15:18:52 +0000 |
|---|---|---|
| committer | Brian Preble <rassilon@gnu.org> | 1991-04-10 15:18:52 +0000 |
| commit | 6d1f885f5c535ff4369a0807cd4d706d512350ce (patch) | |
| tree | 19e6d945057709d10f5bd78fb9feead52bc41268 /lisp/textmodes/nroff-mode.el | |
| parent | a09635667661436b3a1946c5966d9fc522d987cd (diff) | |
| download | emacs-6d1f885f5c535ff4369a0807cd4d706d512350ce.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/textmodes/nroff-mode.el')
| -rw-r--r-- | lisp/textmodes/nroff-mode.el | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/lisp/textmodes/nroff-mode.el b/lisp/textmodes/nroff-mode.el index 16e1445080b..35bf4213615 100644 --- a/lisp/textmodes/nroff-mode.el +++ b/lisp/textmodes/nroff-mode.el @@ -23,7 +23,7 @@ "Abbrev table used while in nroff mode.") (defvar nroff-mode-map nil - "Major mode keymap for nroff-mode buffers") + "Major mode keymap for nroff mode.") (if (not nroff-mode-map) (progn (setq nroff-mode-map (make-sparse-keymap)) @@ -37,8 +37,8 @@ (defun nroff-mode () "Major mode for editing text intended for nroff to format. \\{nroff-mode-map} -Turning on Nroff mode runs text-mode-hook, then nroff-mode-hook. -Also, try nroff-electric-mode, for automatically inserting +Turning on Nroff mode runs `text-mode-hook', then `nroff-mode-hook'. +Also, try `nroff-electric-mode', for automatically inserting closing requests for requests that are used in matched pairs." (interactive) (kill-all-local-variables) @@ -165,7 +165,7 @@ An argument is a repeat count; negative means move forward." (defun electric-nroff-newline (arg) "Insert newline for nroff mode; special if electric-nroff mode. -In electric-nroff-mode, if ending a line containing an nroff opening request, +In `electric-nroff-mode', if ending a line containing an nroff opening request, automatically inserts the matching closing request after point." (interactive "P") (let ((completion (save-excursion @@ -185,12 +185,11 @@ automatically inserts the matching closing request after point." (forward-char 1)))) (defun electric-nroff-mode (&optional arg) - "Toggle nroff-electric-newline minor mode -Nroff-electric-newline forces emacs to check for an nroff -request at the beginning of the line, and insert the -matching closing request if necessary. -This command toggles that mode (off->on, on->off), -with an argument, turns it on iff arg is positive, otherwise off." + "Toggle `nroff-electric-newline' minor mode. +`nroff-electric-newline' forces Emacs to check for an nroff request at the +beginning of the line, and insert the matching closing request if necessary. +This command toggles that mode (off->on, on->off), with an argument, +turns it on iff arg is positive, otherwise off." (interactive "P") (or (eq major-mode 'nroff-mode) (error "Must be in nroff mode")) (or (assq 'nroff-electric-mode minor-mode-alist) |