[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100053: * lisp/newcomment.el (comment-normalize-vars): Better test validity of

[Stefan Monnier]

------------------------------------------------------------
revno: 100053
committer: Stefan Monnier <address@hidden>
branch nick: emacs-23
timestamp: Tue 2010-09-21 15:09:22 +0200
message:
  * lisp/newcomment.el (comment-normalize-vars): Better test validity of
  comment-end-skip.
modified:
  lisp/ChangeLog
  lisp/newcomment.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-09-19 09:49:21 +0000
+++ b/lisp/ChangeLog    2010-09-21 13:09:22 +0000
@@ -1,3 +1,8 @@
+2010-09-21  Stefan Monnier  <address@hidden>
+
+       * newcomment.el (comment-normalize-vars): Better test validity of
+       comment-end-skip.
+
 2010-09-19  Stefan Monnier  <address@hidden>
 
        * emacs-lisp/float-sup.el (float-pi): New name for `pi'.

=== modified file 'lisp/newcomment.el'
--- a/lisp/newcomment.el        2010-01-13 08:35:10 +0000
+++ b/lisp/newcomment.el        2010-09-21 13:09:22 +0000
@@ -318,7 +318,8 @@
                   "+\\)[ \t]*")))
     (unless (and comment-end-skip
                 ;; In case comment-end has changed since last time.
-                (string-match comment-end-skip comment-end))
+                (string-match comment-end-skip
+                               (if (string= "" comment-end) "\n" comment-end)))
       (let ((ce (if (string= "" comment-end) "\n"
                  (comment-string-strip comment-end t t))))
        (set (make-local-variable 'comment-end-skip)