From b61131c3bc4e111b2dc34e8932e924717fbdbbfa Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Mon, 4 May 2015 18:03:15 +0200 Subject: [PATCH] avy-jump.el (avi--overlay-pre): Handle plain numbers * avy-jump.el (avi--overlay-pre): (avi--overlay-post): Handle the case of LEAF being a number. --- avy-jump.el | 26 ++++++++++++++++++-------- 1 file changed, 18 insertions(+), 8 deletions(-) diff --git a/avy-jump.el b/avy-jump.el index e39931d..60f4f25 100644 --- a/avy-jump.el +++ b/avy-jump.el @@ -118,10 +118,15 @@ LEAF is ((BEG . END) . WND)." (avi--overlay (propertize (apply #'string (reverse path)) 'face 'avi-lead-face) - (if (consp (car leaf)) - (caar leaf) - (car leaf)) - (cdr leaf))) + (cond ((numberp leaf) + leaf) + ((consp (car leaf)) + (caar leaf)) + (t + (car leaf))) + (if (consp leaf) + (cdr leaf) + (selected-window)))) (defun avi--overlay-at (path leaf) "Create an overlay with STR at LEAF. @@ -152,10 +157,15 @@ LEAF is ((BEG . END) . WND)." (avi--overlay (propertize (apply #'string (reverse path)) 'face 'avi-lead-face) - (if (consp (car leaf)) - (cdar leaf) - (car leaf)) - (cdr leaf))) + (cond ((numberp leaf) + leaf) + ((consp (car leaf)) + (cdar leaf)) + (t + (car leaf))) + (if (consp leaf) + (cdr leaf) + (selected-window)))) ;;* Commands ;;;###autoload