diff options
Diffstat (limited to 'lisp/diff-mode.el')
| -rw-r--r-- | lisp/diff-mode.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/diff-mode.el b/lisp/diff-mode.el index bf6b5cf4895..6e82b63581a 100644 --- a/lisp/diff-mode.el +++ b/lisp/diff-mode.el | |||
| @@ -1750,7 +1750,14 @@ I.e. like `add-change-log-entry-other-window' but applied to all hunks." | |||
| 1750 | ;; Move to where the changes are, | 1750 | ;; Move to where the changes are, |
| 1751 | ;; `add-change-log-entry-other-window' works better in | 1751 | ;; `add-change-log-entry-other-window' works better in |
| 1752 | ;; that case. | 1752 | ;; that case. |
| 1753 | (re-search-forward "\n[!+-<>]" nil t)) | 1753 | (re-search-forward |
| 1754 | (concat "\n[!+-<>]" | ||
| 1755 | ;; If the hunk is a context hunk with an empty first | ||
| 1756 | ;; half, recognize the "--- NNN,MMM ----" line | ||
| 1757 | "\\(-- [0-9]+\\(,[0-9]+\\)? ----\n" | ||
| 1758 | ;; and skip to the next non-context line. | ||
| 1759 | "\\( .*\n\\)*[+]\\)?") | ||
| 1760 | nil t)) | ||
| 1754 | (save-excursion | 1761 | (save-excursion |
| 1755 | (add-change-log-entry-other-window) | 1762 | (add-change-log-entry-other-window) |
| 1756 | ;; Insert a "." so that the entries created don't get | 1763 | ;; Insert a "." so that the entries created don't get |