summaryrefslogtreecommitdiff
path: root/lisp/newcomment.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2003-05-06 14:06:34 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2003-05-06 14:06:34 +0000
commit2abd03067395fc6360e70cbd8e60c7b165b6a199 (patch)
treec9a8afb87ce8adeffbf3209d119b70a8134f1136 /lisp/newcomment.el
parent824c61ddc607ae740b244d8cee999defc3eae7a0 (diff)
downloademacs-2abd03067395fc6360e70cbd8e60c7b165b6a199.tar.gz
(comment-set-column, comment-kill, comment-or-uncomment-region):
Call comment-normalize-vars since these functions are autoloaded.
Diffstat (limited to 'lisp/newcomment.el')
-rw-r--r--lisp/newcomment.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/newcomment.el b/lisp/newcomment.el
index aa53f50606a..6874da7b4e5 100644
--- a/lisp/newcomment.el
+++ b/lisp/newcomment.el
@@ -517,6 +517,7 @@ With any other arg, set comment column to indentation of the previous comment
(cond
((eq arg '-) (comment-kill nil))
(arg
+ (comment-normalize-vars)
(save-excursion
(beginning-of-line)
(comment-search-backward)
@@ -533,6 +534,7 @@ With any other arg, set comment column to indentation of the previous comment
"Kill the comment on this line, if any.
With prefix ARG, kill comments on that many lines starting with this one."
(interactive "P")
+ (comment-normalize-vars)
(dotimes (_ (prefix-numeric-value arg))
(save-excursion
(beginning-of-line)
@@ -941,6 +943,7 @@ end- comment markers additionally to what `comment-add' already specifies."
in which case call `uncomment-region'. If a prefix arg is given, it
is passed on to the respective function."
(interactive "*r\nP")
+ (comment-normalize-vars)
(funcall (if (save-excursion ;; check for already commented region
(goto-char beg)
(comment-forward (point-max))