# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1132529146 0
# Node ID 10e217ceeee2a6f39d175b7bb2442e3ae61c4914
# Parent  3ce17ff4a61f30789a1af93c59d2b683233e289b
(comment-enter-backward): Fix last fix.

diff -r 3ce17ff4a61f -r 10e217ceeee2 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Nov 20 22:35:48 2005 +0000
+++ b/lisp/ChangeLog	Sun Nov 20 23:25:46 2005 +0000
@@ -1,5 +1,7 @@
 2005-11-20  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* newcomment.el (comment-enter-backward): Fix last fix.
+
 	* simple.el (blink-matching-open):
 	* paren.el (show-paren-function): Allow new paren-class info.
 
diff -r 3ce17ff4a61f -r 10e217ceeee2 lisp/newcomment.el
--- a/lisp/newcomment.el	Sun Nov 20 22:35:48 2005 +0000
+++ b/lisp/newcomment.el	Sun Nov 20 23:25:46 2005 +0000
@@ -480,8 +480,8 @@
       (progn (backward-char) (skip-syntax-backward " "))
     (cond
      ((save-restriction
-        (beginning-of-line)
-        (narrow-to-region (point) end)
+        (narrow-to-region (line-beginning-position) (point))
+        (goto-char (point-min))
         (re-search-forward (concat comment-end-skip "\\'") nil t))
       (goto-char (match-beginning 0)))
      ;; comment-end-skip not found.  Maybe we're at EOB which implicitly