# HG changeset patch # User Stefan Monnier # Date 1005682646 0 # Node ID c07719cfdfcdb6459d65510dcf4f3d77395c16d9 # Parent 67b7e18e1aca286d1a38913d9b1582f2750e06e7 (comment-normalize-vars): Handle a nil comment-padding. diff -r 67b7e18e1aca -r c07719cfdfcd lisp/newcomment.el --- a/lisp/newcomment.el Tue Nov 13 19:06:58 2001 +0000 +++ b/lisp/newcomment.el Tue Nov 13 20:17:26 2001 +0000 @@ -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.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 @@ (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