Browse Source

git-blame.el: Do not use goto-line in lisp code

goto-line is a user-level command, instead use the lisp-level
construct recommended in Emacs documentation.

Signed-off-by: Rüdiger Sonderfeld <ruediger@c-plusplus.de>
Signed-off-by: Lawrence Mitchell <wence@gmx.li>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
maint
Rüdiger Sonderfeld 13 years ago committed by Junio C Hamano
parent
commit
5d7da9a944
  1. 3
      contrib/emacs/git-blame.el

3
contrib/emacs/git-blame.el

@ -389,7 +389,8 @@ See also function `git-blame-mode'." @@ -389,7 +389,8 @@ See also function `git-blame-mode'."
(set-buffer git-blame-file)
(let ((inhibit-point-motion-hooks t)
(inhibit-modification-hooks t))
(goto-line start-line)
(goto-char (point-min))
(forward-line (1- start-line))
(let* ((start (point))
(end (progn (forward-line num-lines) (point)))
(ovl (make-overlay start end))

Loading…
Cancel
Save