(diff-hunk-kill): Fix the search of the next hunk (bug#4368).

2009-09-09 14:47:54 +00:00
parent 5cc79e5aff
commit cd8752523c
2 changed files with 7 additions and 1 deletions
--- 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."
  (interactive)
  (diff-beginning-of-hunk)
  (let* ((start (point))
-	 (nexthunk (when (re-search-forward diff-hunk-header-re nil t)
+         ;; Search the second match, since we're looking at the first.
+	 (nexthunk (when (re-search-forward diff-hunk-header-re nil t 2)
 		     (match-beginning 0)))
 	 (firsthunk (ignore-errors
 		      (goto-char start)