[Emacs-diffs] emacs-25 3877c91: vc-region-history: Search just on lines intersecting the region

[Tino Calancha]

branch: emacs-25
commit 3877c911b7bd4ca7def18932615b10dc7b1fc6d3
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>

    vc-region-history: Search just on lines intersecting the region
    
    * lisp/vc/vc.el (vc-region-history): If region ends in the beginning
    of a line, then exclude that line from the search (Bug#24725).
---
 lisp/vc/vc.el |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index af875e8..ac020d0 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -2393,7 +2393,7 @@ When called interactively with a prefix argument, prompt 
for REMOTE-LOCATION."
   "Show the history of the region FROM..TO."
   (interactive "r")
   (let* ((lfrom (line-number-at-pos from))
-         (lto   (line-number-at-pos to))
+         (lto   (line-number-at-pos (1- to)))
          (file buffer-file-name)
          (backend (vc-backend file))
          (buf (get-buffer-create "*VC-history*")))