diff options
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/bib-mode.el | 3 | ||||
| -rw-r--r-- | lisp/textmodes/makeinfo.el | 1 | ||||
| -rw-r--r-- | lisp/textmodes/page.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/paragraphs.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/picture.el | 12 | ||||
| -rw-r--r-- | lisp/textmodes/scribe.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/spell.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 4 | ||||
| -rw-r--r-- | lisp/textmodes/text-mode.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/underline.el | 2 |
10 files changed, 17 insertions, 15 deletions
diff --git a/lisp/textmodes/bib-mode.el b/lisp/textmodes/bib-mode.el index 9ccbd517ea0..ef9a7f67864 100644 --- a/lisp/textmodes/bib-mode.el +++ b/lisp/textmodes/bib-mode.el @@ -1,4 +1,4 @@ -;;; bib-mode.el --- bib-mode, major mode for editing bib files. +;;; bib-mode.el --- major mode for editing bib files ;; Copyright (C) 1989 Free Software Foundation, Inc. @@ -30,6 +30,7 @@ ;; and appropriate keys are presented for various kinds of entries. ;;; Code: + (defgroup bib nil "Major mode for editing bib files." :prefix "bib-" diff --git a/lisp/textmodes/makeinfo.el b/lisp/textmodes/makeinfo.el index 0beccbc5fc7..718d96ed5ac 100644 --- a/lisp/textmodes/makeinfo.el +++ b/lisp/textmodes/makeinfo.el @@ -253,4 +253,3 @@ line LINE of the window, or centered if LINE is nil." (provide 'makeinfo) ;;; makeinfo.el ends here - diff --git a/lisp/textmodes/page.el b/lisp/textmodes/page.el index e8f5b5d6bbf..7bf8631a3f5 100644 --- a/lisp/textmodes/page.el +++ b/lisp/textmodes/page.el @@ -1,4 +1,4 @@ -;;; page.el --- page motion commands for emacs. +;;; page.el --- page motion commands for Emacs ;; Copyright (C) 1985 Free Software Foundation, Inc. diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el index 4ecc0c2d433..172c2cdf35c 100644 --- a/lisp/textmodes/paragraphs.el +++ b/lisp/textmodes/paragraphs.el @@ -1,4 +1,4 @@ -;;; paragraphs.el --- paragraph and sentence parsing. +;;; paragraphs.el --- paragraph and sentence parsing ;; Copyright (C) 1985, 86, 87, 91, 94, 95, 96, 1997, 1999, 2000, 2001 ;; Free Software Foundation, Inc. diff --git a/lisp/textmodes/picture.el b/lisp/textmodes/picture.el index d1f87fa0b54..25e60eb4809 100644 --- a/lisp/textmodes/picture.el +++ b/lisp/textmodes/picture.el @@ -1,4 +1,4 @@ -;;; picture.el --- "Picture mode" -- editing using quarter-plane screen model. +;;; picture.el --- "Picture mode" -- editing using quarter-plane screen model ;; Copyright (C) 1985, 1994 Free Software Foundation, Inc. @@ -397,7 +397,7 @@ stops computed are displayed in the minibuffer with `:' at each stop." (skip-chars-forward " \t") (setq tabs (cons (current-column) tabs))) (if (null tabs) - (error "No characters in set %s on this line." + (error "No characters in set %s on this line" (regexp-quote picture-tab-chars)))))) (setq tab-stop-list tabs) (let ((blurb (make-string (1+ (nth (1- (length tabs)) tabs)) ?\ ))) @@ -486,7 +486,7 @@ shifting existing text. Leaves mark at one corner of rectangle and point at the other (diagonally opposed) corner." (interactive "P") (if (not (consp picture-killed-rectangle)) - (error "No rectangle saved.") + (error "No rectangle saved") (picture-insert-rectangle picture-killed-rectangle insertp))) (defun picture-yank-at-click (click arg) @@ -508,7 +508,7 @@ of rectangle and point at the other (diagonally opposed) corner." (interactive "cRectangle from register: \nP") (let ((rectangle (get-register register))) (if (not (consp rectangle)) - (error "Register %c does not contain a rectangle." register) + (error "Register %c does not contain a rectangle" register) (picture-insert-rectangle rectangle insertp)))) (defun picture-insert-rectangle (rectangle &optional insertp) @@ -698,7 +698,7 @@ Note that Picture mode commands will work outside of Picture mode, but they are not defaultly assigned to keys." (interactive) (if (eq major-mode 'picture-mode) - (error "You are already editing a picture.") + (error "You are already editing a picture") (make-local-variable 'picture-mode-old-local-map) (setq picture-mode-old-local-map (current-local-map)) (use-local-map picture-mode-map) @@ -735,7 +735,7 @@ With no argument strips whitespace from end of every line in Picture buffer otherwise just return to previous mode." (interactive "P") (if (not (eq major-mode 'picture-mode)) - (error "You aren't editing a Picture.") + (error "You aren't editing a Picture") (if (not nostrip) (delete-trailing-whitespace)) (setq mode-name picture-mode-old-mode-name) (use-local-map picture-mode-old-local-map) diff --git a/lisp/textmodes/scribe.el b/lisp/textmodes/scribe.el index 0123ce82d5f..d1b5aedf3c6 100644 --- a/lisp/textmodes/scribe.el +++ b/lisp/textmodes/scribe.el @@ -1,4 +1,4 @@ -;;; scribe.el --- scribe mode, and its idiosyncratic commands. +;;; scribe.el --- scribe mode, and its idiosyncratic commands ;; Copyright (C) 1985 Free Software Foundation, Inc. diff --git a/lisp/textmodes/spell.el b/lisp/textmodes/spell.el index e8fe420a842..1923c867fb7 100644 --- a/lisp/textmodes/spell.el +++ b/lisp/textmodes/spell.el @@ -1,4 +1,4 @@ -;;; spell.el --- spelling correction interface for Emacs. +;;; spell.el --- spelling correction interface for Emacs ;; Copyright (C) 1985 Free Software Foundation, Inc. diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index e74f64ef23b..07dcee289b2 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -1,4 +1,4 @@ -;;; tex-mode.el --- TeX, LaTeX, and SliTeX mode commands. +;;; tex-mode.el --- TeX, LaTeX, and SliTeX mode commands ;; Copyright (C) 1985, 86, 89, 92, 94, 95, 96, 97, 98, 1999 ;; Free Software Foundation, Inc. @@ -26,6 +26,8 @@ ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, ;; Boston, MA 02111-1307, USA. +;;; Commentary: + ;;; Code: ;; Pacify the byte-compiler diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el index 41728618cbd..e6d3e0548b2 100644 --- a/lisp/textmodes/text-mode.el +++ b/lisp/textmodes/text-mode.el @@ -1,4 +1,4 @@ -;;; text-mode.el --- text mode, and its idiosyncratic commands. +;;; text-mode.el --- text mode, and its idiosyncratic commands ;; Copyright (C) 1985, 1992, 1994 Free Software Foundation, Inc. diff --git a/lisp/textmodes/underline.el b/lisp/textmodes/underline.el index a7e6d30bd5c..d6f08b5deea 100644 --- a/lisp/textmodes/underline.el +++ b/lisp/textmodes/underline.el @@ -1,4 +1,4 @@ -;;; underline.el --- insert/remove underlining (done by overstriking) in Emacs. +;;; underline.el --- insert/remove underlining (done by overstriking) in Emacs ;; Copyright (C) 1985 Free Software Foundation, Inc. |