diff options
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | 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 @@ | |||
| 1 | 2005-11-20 Stefan Monnier <monnier@iro.umontreal.ca> | 1 | 2005-11-20 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 2 | ||
| 3 | * newcomment.el (comment-enter-backward): Fix last fix. | ||
| 4 | |||
| 3 | * simple.el (blink-matching-open): | 5 | * simple.el (blink-matching-open): |
| 4 | * paren.el (show-paren-function): Allow new paren-class info. | 6 | * paren.el (show-paren-function): Allow new paren-class info. |
| 5 | 7 | ||
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." | |||
| 480 | (progn (backward-char) (skip-syntax-backward " ")) | 480 | (progn (backward-char) (skip-syntax-backward " ")) |
| 481 | (cond | 481 | (cond |
| 482 | ((save-restriction | 482 | ((save-restriction |
| 483 | (beginning-of-line) | 483 | (narrow-to-region (line-beginning-position) (point)) |
| 484 | (narrow-to-region (point) end) | 484 | (goto-char (point-min)) |
| 485 | (re-search-forward (concat comment-end-skip "\\'") nil t)) | 485 | (re-search-forward (concat comment-end-skip "\\'") nil t)) |
| 486 | (goto-char (match-beginning 0))) | 486 | (goto-char (match-beginning 0))) |
| 487 | ;; comment-end-skip not found. Maybe we're at EOB which implicitly | 487 | ;; comment-end-skip not found. Maybe we're at EOB which implicitly |