From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 13 Nov 2001 20:19:22 +0000 (+0000)
Subject: (comment-normalize-vars): Handle a nil comment-padding.
X-Git-Tag: ttn-vms-21-2-B4~18594
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9145f1c236625f8fab15e7ea032c11e666487d66;p=emacs.git

(comment-normalize-vars): Handle a nil comment-padding.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8d928502e28..b9ae96a0d8e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -5,6 +5,8 @@
 
 2001-11-13  Stefan Monnier  <monnier@cs.yale.edu>
 
+	* newcomment.el (comment-normalize-vars): Handle a nil comment-padding.
+
 	* progmodes/ada-mode.el (ada-fill-comment-prefix): GNAT wants 2 spaces.
 	From Emmanuel Briot <briot@act-europe.fr>.
 
diff --git a/lisp/newcomment.el b/lisp/newcomment.el
index ecef1c7b182..fe43618ba73 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 <monnier@cs.yale.edu>
 ;; Keywords: comment uncomment
-;; Revision: $Id: newcomment.el,v 1.36 2001/10/11 01:44:48 monnier Exp $
+;; Revision: $Id: newcomment.el,v 1.37 2001/10/12 22:37:51 monnier Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -220,6 +220,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