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

avy-jump.el (avy-goto-word-1): Fix for "."

Browse Source 
Fixes #7
This commit is contained in:
Oleh Krehel 2015-05-07 15:36:35 +02:00
parent 903e172517
commit b2112e0fe9
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
avy-jump.el
View File

@ -315,12 +315,15 @@ 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")
(let* ((str (string (read-char "char: ")))
(regex (if (and avy-word-punc-regexp
(string-match avy-word-punc-regexp str))
str
(concat
"\\b"
str))))
(regex (cond ((string= str ".")
"\\.")
((and avy-word-punc-regexp
(string-match avy-word-punc-regexp str))
str)
(t
(concat
"\\b"
str)))))
(avy--generic-jump regex arg avy-goto-word-style)))
(declare-function subword-backward "subword")