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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 652c9ad7e44f16db6b8159081b65571ea0cf4507..59abf190e14b52fe0e3a69142d60493c09d0c8ee 100644 (file)
--- 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 ddb6c71d1a6c8ea5a4ae0f5f7d1c7888172a6da2..40bb36daf45927ee010e83c5c38cfc813d11da37 100644 (file)
--- 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.