From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 19 Dec 2012 19:41:43 +0000 (-0500)
Subject: * lisp/vc/diff-mode.el (diff-post-command-hook): Don't ignore changes at the
X-Git-Tag: emacs-24.3.90~173^2~7^2~553
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f4d79bd021831eb64e1bfc7f5c5b1ddb2138b37a;p=emacs.git

* 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 8e16fe02d9c..3fd8b363546 100644
--- 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 0c023b0f7f4..edd209a7910 100644
--- 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))