mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(comment-normalize-vars): Initialize properly if comment-start was nil.

Browse Source
This commit is contained in:
Stefan Monnier 2003-11-25 21:20:51 +00:00
parent 4dddd07f26
commit 0d6a08f64d
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/newcomment.el
View File

@ -224,10 +224,10 @@ terminated by the end of line (i.e. `comment-end' is empty)."
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)