* lisp/vc/diff-mode.el (diff-post-command-hook): Don't ignore changes at the

very beginning of a hunk (e.g. killing the first line).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8e16fe02d9c00cef456c37c25c742fc0477bed9d..3fd8b3635461719e51afb7180aef929d653f4f7a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-12-19  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * vc/diff-mode.el (diff-post-command-hook): Don't ignore changes at the
+       very beginning of a hunk (e.g. killing the first line).
+
 2012-12-19  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/tramp-sh.el (tramp-sh-handle-file-acl): Delete empty lines

diff --git a/lisp/vc/diff-mode.el b/lisp/vc/diff-mode.el
index 0c023b0f7f4f478989f99dd3b48bd9f71d228304..edd209a79104d20e9e936f8c37ec0baa03edecb6 100644 (file)
--- a/lisp/vc/diff-mode.el
+++ b/lisp/vc/diff-mode.el
@@ -1298,7 +1298,7 @@ See `after-change-functions' for the meaning of BEG, END and LEN."
                           (re-search-forward diff-context-mid-hunk-header-re
                                              nil t)))))
           (when (and ;; Don't try to fixup changes in the hunk header.
-                 (> (car diff-unhandled-changes) start)
+                 (>= (car diff-unhandled-changes) start)
                  ;; Don't try to fixup changes in the mid-hunk header either.
                  (or (not mid)
                      (< (cdr diff-unhandled-changes) (match-beginning 0))