From d473dce83055a56fed39293a0ab5e9023b955862 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Sun, 18 Sep 2011 14:10:01 -0400 Subject: [PATCH] Fix for uncommentin in Fundamental mode. * newcomment.el (comment-normalize-vars): If prompting for comment-start, set comment-start-skip too. Fixes: debbugs:8424 --- lisp/ChangeLog | 5 +++++ lisp/newcomment.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a08e8c2f91b..459e360c8d7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-09-18 Chong Yidong + + * newcomment.el (comment-normalize-vars): If prompting for + comment-start, set comment-start-skip too (Bug#8424). + 2011-09-18 Johan Bockgård * icomplete.el: Fix previous fix of Bug#5849. diff --git a/lisp/newcomment.el b/lisp/newcomment.el index 8c0d7b25939..3f2338b3a4c 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -316,7 +316,8 @@ the variables are properly set." (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)))) + (set (make-local-variable 'comment-start) cs) + (set (make-local-variable 'comment-start-skip) cs)))) ;; comment-use-syntax (when (eq comment-use-syntax 'undecided) (set (make-local-variable 'comment-use-syntax) -- 2.39.2