diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-06-17 19:59:09 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-06-17 19:59:09 +0000 |
| commit | 822b684f835b21601550f68016d783535a0932b3 (patch) | |
| tree | c299acac8febbac4ed22b4b88b4fd9969bbbcca3 /lisp/emacs-lisp/lisp-mnt.el | |
| parent | 651fca74e4499539c76898a9e2b6109047c404a7 (diff) | |
| download | emacs-822b684f835b21601550f68016d783535a0932b3.tar.gz emacs-822b684f835b21601550f68016d783535a0932b3.tar.bz2 emacs-822b684f835b21601550f68016d783535a0932b3.zip | |
(lm-section-mark): Accept extra semicolons;
accept spaces at end of line.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mnt.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mnt.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el index 271e570d2e9..ac2d9c4b4ca 100644 --- a/lisp/emacs-lisp/lisp-mnt.el +++ b/lisp/emacs-lisp/lisp-mnt.el @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Maintainer: Eric S. Raymond <esr@snark.thyrsus.com> ;; Created: 14 Jul 1992 -;; Version: $Id: lisp-mnt.el,v 1.7 1993/12/26 08:02:10 rms Exp kwzh $ +;; Version: $Id: lisp-mnt.el,v 1.8 1994/05/03 23:21:00 kwzh Exp rms $ ;; Keywords: docs ;; X-Bogus-Bureaucratic-Cruft: Gruad will get you if you don't watch out! @@ -123,7 +123,7 @@ (save-excursion (let ((case-fold-search t)) (goto-char (point-min)) - (if (re-search-forward (concat "^;;; " hd ":$") nil t) + (if (re-search-forward (concat "^;;;;* " hd ":[ \t]*$") nil t) (progn (beginning-of-line) (if after (forward-line 1)) |