diff options
author | Tino Calancha <tino.calancha@gmail.com> | 2016-10-20 19:39:59 +0900 |
---|---|---|
committer | Tino Calancha <tino.calancha@gmail.com> | 2016-10-20 19:39:59 +0900 |
commit | 3877c911b7bd4ca7def18932615b10dc7b1fc6d3 (patch) | |
tree | 56964ee90934d3940cbb8a65118b143e1b78012e /lisp/vc/vc.el | |
parent | 8988327d548db7b69f30ea15496ccb0726fa4502 (diff) | |
download | emacs-3877c911b7bd4ca7def18932615b10dc7b1fc6d3.tar.gz emacs-3877c911b7bd4ca7def18932615b10dc7b1fc6d3.tar.bz2 emacs-3877c911b7bd4ca7def18932615b10dc7b1fc6d3.zip |
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).
Diffstat (limited to 'lisp/vc/vc.el')
-rw-r--r-- | lisp/vc/vc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index af875e89907..ac020d09539 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*"))) |