ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2025-10-15 14:13:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

avy.el (avy-goto-line): Fixup goto-line clause

Browse Source 
Fixes #79
This commit is contained in:
Oleh Krehel 2015-07-16 22:03:25 +02:00
parent 3b9a60a334
commit 26123a7b37
1 changed files with 15 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
avy.el
View File

@ -932,7 +932,7 @@ The window scope is determined by `avy-all-windows' (ARG negates it)."
The window scope is determined by `avy-all-windows' (ARG negates it)." The window scope is determined by `avy-all-windows' (ARG negates it)."
(interactive "P") (interactive "P")
(avy-with avy-goto-line (avy-with avy-goto-line
(let ((avy-handler-function (let* ((avy-handler-function
(lambda (char) (lambda (char)
(if (or (< char ?0) (if (or (< char ?0)
(> char ?9)) (> char ?9))
@ -943,9 +943,10 @@ The window scope is determined by `avy-all-windows' (ARG negates it)."
(push-mark) (push-mark)
(goto-char (point-min)) (goto-char (point-min))
(forward-line (1- (string-to-number line))) (forward-line (1- (string-to-number line)))
(throw 'done 'exit))))))) (throw 'done 'exit))))))
(avy-action-goto (r (avy--line arg)))
(avy--line arg))))) (unless (eq r t)
(avy-action-goto r)))))
;;;###autoload ;;;###autoload
(defun avy-copy-line (arg) (defun avy-copy-line (arg)