(rmail-convert-to-babyl-format): Display a message while converting to Babyl.

[gnu-emacs] / lisp / generic.el

diff --git a/lisp/generic.el b/lisp/generic.el
index 97eb131346e1c89db2043eafc50e2df0496ad6a4..8f13dc375e7977c111eb167542fd90a3150366a0 100644 (file)
--- a/lisp/generic.el
+++ b/lisp/generic.el
@@ -1,4 +1,4 @@
-;;; generic.el --- Defining simple major modes with comment and font-lock.
+;;; generic.el --- defining simple major modes with comment and font-lock
 ;;
 ;; Copyright (C) 1997, 1999 Free Software Foundation, Inc.
 ;;
@@ -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
@@ -417,4 +417,5 @@ The regexp is highlighted with FACE."
 
 (provide 'generic)
 
+;;; arch-tag: 239c1fc4-1303-48d9-9ac0-657d655669ea
 ;;; generic.el ends here