From 1cb40089150ceeb9e836d13e33e391fbd5e88d05 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 20 Nov 2005 23:25:46 +0000 Subject: [PATCH] (comment-enter-backward): Fix last fix. --- lisp/ChangeLog | 2 ++ lisp/newcomment.el | 4 ++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c5bbf08564f..bd703735762 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2005-11-20 Stefan Monnier + * newcomment.el (comment-enter-backward): Fix last fix. + * simple.el (blink-matching-open): * paren.el (show-paren-function): Allow new paren-class info. diff --git a/lisp/newcomment.el b/lisp/newcomment.el index 7716a704359..9995b4b9156 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -480,8 +480,8 @@ Point is assumed to be just at the end of a comment." (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 -- 2.39.2