diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/diff-mode.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a173f58335a..d030d24304e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2009-09-09 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * diff-mode.el (diff-hunk-kill): Fix the search of the next hunk | ||
| 4 | (bug#4368). | ||
| 5 | |||
| 1 | 2009-09-09 Katsumi Yamaoka <yamaoka@jpl.org> | 6 | 2009-09-09 Katsumi Yamaoka <yamaoka@jpl.org> |
| 2 | 7 | ||
| 3 | * calendar/time-date.el (autoload): | 8 | * calendar/time-date.el (autoload): |
diff --git a/lisp/diff-mode.el b/lisp/diff-mode.el index 56bcde521ac..93a8a418806 100644 --- a/lisp/diff-mode.el +++ b/lisp/diff-mode.el | |||
| @@ -546,7 +546,8 @@ If the prefix ARG is given, restrict the view to the current file instead." | |||
| 546 | (interactive) | 546 | (interactive) |
| 547 | (diff-beginning-of-hunk) | 547 | (diff-beginning-of-hunk) |
| 548 | (let* ((start (point)) | 548 | (let* ((start (point)) |
| 549 | (nexthunk (when (re-search-forward diff-hunk-header-re nil t) | 549 | ;; Search the second match, since we're looking at the first. |
| 550 | (nexthunk (when (re-search-forward diff-hunk-header-re nil t 2) | ||
| 550 | (match-beginning 0))) | 551 | (match-beginning 0))) |
| 551 | (firsthunk (ignore-errors | 552 | (firsthunk (ignore-errors |
| 552 | (goto-char start) | 553 | (goto-char start) |