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 ".")
"\\.")
((and avy-word-punc-regexp
(string-match avy-word-punc-regexp str)) (string-match avy-word-punc-regexp str))
str str)
(t
(concat (concat
"\\b" "\\b"
str)))) 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")