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>
Rüdiger Sonderfeld committed
Jun 14, 2012 at 10:37 UTC
5d7da9a94489da0db3b3c7b766606b80fc71becf
1 file changed
+2
-1
contrib/emacs/git-blame.el
+2
-1
@@ -389,7 +389,8 @@ See also function `git-blame-mode'."
389
(set-buffer git-blame-file)
390
(let ((inhibit-point-motion-hooks t)
391
(inhibit-modification-hooks t))
392
- (goto-line start-line)
392
+ (goto-char (point-min))
393
+ (forward-line (1- start-line))
394
(let* ((start (point))
395
(end (progn (forward-line num-lines) (point)))
396
(ovl (make-overlay start end))