From 03a325a7b6daf4cdc21631827e0095cb29f20b6b Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 13 Nov 2001 20:16:38 +0000 Subject: [PATCH] (comment-normalize-vars): Handle a nil comment-padding. --- lisp/ChangeLog | 6 +++++- lisp/newcomment.el | 3 ++- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 79e99a49073..eb705578db1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2001-11-13 Stefan Monnier + + * newcomment.el (comment-normalize-vars): Handle a nil comment-padding. + 2001-11-12 Richard M. Stallman * calendar/todo-mode.el (todo-save): Add save-excursion @@ -22,7 +26,7 @@ * vc.el (vc-clear-context): Fill obarray with 0, not nil. (vc-annotate-color-map): Doc fix. - + 2001-11-08 Eli Zaretskii * international/mule.el (make-translation-table): Doc fix. diff --git a/lisp/newcomment.el b/lisp/newcomment.el index 0ed7bb412a9..98b02a6bfb0 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -5,7 +5,7 @@ ;; Author: code extracted from Emacs-20's simple.el ;; Maintainer: Stefan Monnier ;; Keywords: comment uncomment -;; Revision: $Id: newcomment.el,v 1.34 2001/09/01 21:23:17 monnier Exp $ +;; Revision: $Id: newcomment.el,v 1.35 2001/09/27 21:13:44 monnier Exp $ ;; This file is part of GNU Emacs. @@ -219,6 +219,7 @@ This is obsolete because you might as well use \\[newline-and-indent]." (goto-char (point-min)) (and (forward-comment 1) (eobp)))))) ;; comment-padding + (unless comment-padding (setq comment-padding 0)) (when (integerp comment-padding) (setq comment-padding (make-string comment-padding ? ))) ;; comment markers -- 2.39.2