diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/diff-mode.el | 9 |
2 files changed, 13 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f98813d6d37..3e1c40b930c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2008-02-08 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * diff-mode.el (diff-add-change-log-entries-other-window): Avoid the | ||
| 4 | splitter in context hunks. | ||
| 5 | |||
| 1 | 2008-02-08 Kenichi Handa <handa@ni.aist.go.jp> | 6 | 2008-02-08 Kenichi Handa <handa@ni.aist.go.jp> |
| 2 | 7 | ||
| 3 | * international/fontset.el (setup-default-fontset): Fix arabic otf | 8 | * international/fontset.el (setup-default-fontset): Fix arabic otf |
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 |