From: Stefan Monnier Date: Thu, 29 Mar 2001 14:16:37 +0000 (+0000) Subject: (generic-mode-set-comments): Use "" rather than nil for comment-end. X-Git-Tag: emacs-pretest-21.0.101~117 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1ac1fa962672bdf6c47d1d59812cd49da554f6e7;p=emacs.git (generic-mode-set-comments): Use "" rather than nil for comment-end. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6801e15190c..24db082e6e9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,7 +1,12 @@ +2001-03-29 Stefan Monnier + + * generic.el (generic-mode-set-comments): Use "" rather than nil + for comment-end. + 2001-03-29 Gerd Moellmann - * emacs-lisp/advice.el (ad-make-advised-definition): Call - interactive-form to obtain the interactive spec of subrs. + * emacs-lisp/advice.el (ad-make-advised-definition): + Call interactive-form to obtain the interactive spec of subrs. * subr.el (interactive-form): New function. 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'." (concat comment-start-skip "\\|" (regexp-quote start) "+\\s-*"))) ;; First comment-style (setq comment-start start) - (setq comment-end (unless (string-equal end "\n") end)) + (setq comment-end (if (string-equal end "\n") "" end)) (setq comment-start-skip (concat (regexp-quote start) "+\\s-*"))) ;; Reuse comstyles if necessary