Add `avi-word-punc-regexp` defcustom

- Setting this to nil will disable jumping to punctuation chars during
  `avi-goto-word-1`.
- Set this to a regexp of punctuation chars you want to match otherwise.
- "[!-/:-@[-`{-~]" will match all printable punctuation chars.
old-master
Kaushal Modi 11 years ago
parent 6a0acfc14f
commit dfe24f3d80
  1. 9
      avy-jump.el

@ -42,6 +42,12 @@
"When non-nil, a gray background will be added during the selection."
:type 'boolean)
(defcustom avi-word-punc-regexp "[!-/:-@[-`{-~]"
"Regexp of punctuation characters that should be matched when calling
`avi-goto-word-1' command. When nil, punctuation chars will not be matched.
\"[!-/:-@[-`{-~]\" will match all printable punctuation chars.")
(defface avi-lead-face
'((t (:foreground "white" :background "#e52b50")))
"Face used for the leading chars.")
@ -249,7 +255,8 @@ Read one char with which the word should start."
(interactive)
(let* ((str (string (read-char "char: ")))
(candidates (avi--regex-candidates
(if (string-match "[,.+-*/=]" str)
(if (and avi-word-punc-regexp
(string-match avi-word-punc-regexp str))
str
(concat
"\\b"

Loading…
Cancel
Save