From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 23 Mar 2012 02:46:31 +0000 (-0400)
Subject: * lisp/newcomment.el (comment-choose-indent): No space after BOL.
X-Git-Tag: emacs-pretest-24.0.05~70
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b9d0879b49887a1db7630be9cab7fb60cf09cfd3;p=emacs.git

* lisp/newcomment.el (comment-choose-indent): No space after BOL.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 652c9ad7e44..59abf190e14 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-03-23  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* newcomment.el (comment-choose-indent): No space after BOL.
+
 2012-03-22  Sam Steingold  <sds@gnu.org>
 
 	* window.el (switch-to-prev-buffer): Revert last patch because the
diff --git a/lisp/newcomment.el b/lisp/newcomment.el
index ddb6c71d1a6..40bb36daf45 100644
--- a/lisp/newcomment.el
+++ b/lisp/newcomment.el
@@ -587,7 +587,7 @@ Point is expected to be at the start of the comment."
                    (save-excursion (end-of-line) (current-column)))))
         (other nil)
         (min (save-excursion (skip-chars-backward " \t")
-                             (1+ (current-column)))))
+                             (if (bolp) 0 (1+ (current-column))))))
     ;; Fix up the range.
     (if (< max min) (setq max min))
     ;; Don't move past the fill column.