aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2001-03-29 14:16:37 +0000
committerStefan Monnier2001-03-29 14:16:37 +0000
commit1ac1fa962672bdf6c47d1d59812cd49da554f6e7 (patch)
tree725d5640cefa41450eb30860f7fc3b9ba84d8229
parente2b8a8307614d0b603bbf98beed3b154e67a95c4 (diff)
downloademacs-1ac1fa962672bdf6c47d1d59812cd49da554f6e7.tar.gz
emacs-1ac1fa962672bdf6c47d1d59812cd49da554f6e7.zip
(generic-mode-set-comments): Use "" rather than nil for comment-end.
-rw-r--r--lisp/ChangeLog9
-rw-r--r--lisp/generic.el2
2 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6801e15190c..24db082e6e9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,12 @@
12001-03-29 Stefan Monnier <monnier@cs.yale.edu>
2
3 * generic.el (generic-mode-set-comments): Use "" rather than nil
4 for comment-end.
5
12001-03-29 Gerd Moellmann <gerd@gnu.org> 62001-03-29 Gerd Moellmann <gerd@gnu.org>
2 7
3 * emacs-lisp/advice.el (ad-make-advised-definition): Call 8 * emacs-lisp/advice.el (ad-make-advised-definition):
4 interactive-form to obtain the interactive spec of subrs. 9 Call interactive-form to obtain the interactive spec of subrs.
5 10
6 * subr.el (interactive-form): New function. 11 * subr.el (interactive-form): New function.
7 12
diff --git a/lisp/generic.el b/lisp/generic.el
index 97eb131346e..fd2ac80afa0 100644
--- a/lisp/generic.el
+++ b/lisp/generic.el
@@ -309,7 +309,7 @@ Some generic modes are defined in `generic-x.el'."
309 (concat comment-start-skip "\\|" (regexp-quote start) "+\\s-*"))) 309 (concat comment-start-skip "\\|" (regexp-quote start) "+\\s-*")))
310 ;; First comment-style 310 ;; First comment-style
311 (setq comment-start start) 311 (setq comment-start start)
312 (setq comment-end (unless (string-equal end "\n") end)) 312 (setq comment-end (if (string-equal end "\n") "" end))
313 (setq comment-start-skip (concat (regexp-quote start) "+\\s-*"))) 313 (setq comment-start-skip (concat (regexp-quote start) "+\\s-*")))
314 314
315 ;; Reuse comstyles if necessary 315 ;; Reuse comstyles if necessary