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

Fixes #7
This commit is contained in:
Oleh Krehel 2015-05-07 15:36:35 +02:00
parent 903e172517
commit b2112e0fe9

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)." The window scope is determined by `avy-all-windows' (ARG negates it)."
(interactive "P") (interactive "P")
(let* ((str (string (read-char "char: "))) (let* ((str (string (read-char "char: ")))
(regex (if (and avy-word-punc-regexp (regex (cond ((string= str ".")
(string-match avy-word-punc-regexp str)) "\\.")
str ((and avy-word-punc-regexp
(concat (string-match avy-word-punc-regexp str))
"\\b" str)
str)))) (t
(concat
"\\b"
str)))))
(avy--generic-jump regex arg avy-goto-word-style))) (avy--generic-jump regex arg avy-goto-word-style)))
(declare-function subword-backward "subword") (declare-function subword-backward "subword")