# HG changeset patch # User Stefan Monnier # Date 1069795251 0 # Node ID 2ea1aaf0d7db9d37f4fc211b7e4fb065794cc30e # Parent edb49454fb8c231534781070a9612f0a2ff0b1ef (comment-normalize-vars): Initialize properly if comment-start was nil. diff -r edb49454fb8c -r 2ea1aaf0d7db lisp/newcomment.el --- a/lisp/newcomment.el Tue Nov 25 14:45:32 2003 +0000 +++ b/lisp/newcomment.el Tue Nov 25 21:20:51 2003 +0000 @@ -224,10 +224,10 @@ Functions autoloaded from newcomment.el, being entry points, should call this function before any other, so the rest of the code can assume that the variables are properly set." - (if (not comment-start) - (unless noerror - (set (make-local-variable 'comment-start) - (read-string "No comment syntax is defined. Use: "))) + (unless (and (not comment-start) noerror) + (unless comment-start + (set (make-local-variable 'comment-start) + (read-string "No comment syntax is defined. Use: "))) ;; comment-use-syntax (when (eq comment-use-syntax 'undecided) (set (make-local-variable 'comment-use-syntax)