martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(comment-normalize-vars): Check the user-specified comment start marker.

Browse Source
This commit is contained in:
Stefan Monnier
2004-03-04 20:02:52 +00:00
parent aa83be2adf
commit 31df2900a4
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/newcomment.el
View File

@@ -251,8 +251,10 @@ this function before any other, so the rest of the code can assume that
the variables are properly set."
(unless (and (not comment-start) noerror)
(unless comment-start
(set (make-local-variable 'comment-start)
(read-string "No comment syntax is defined. Use: ")))
(let ((cs (read-string "No comment syntax is defined. Use: ")))
(if (zerop (length cs))
(error "No comment syntax defined")
(set (make-local-variable 'comment-start) cs))))
;; comment-use-syntax
(when (eq comment-use-syntax 'undecided)
(set (make-local-variable 'comment-use-syntax)