branch: master
commit 53d457cfe48956a1cbffb7f0f6d735af322fd093
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
Add misc punctuation to subword commands
* avy.el (avy-goto-subword-0): Temporarily bind
`subword-backward-regexp' to allow chars like ! or @ to count as
subword parts.
Fixes #93
---
avy.el | 3 +++
1 files changed, 3 insertions(+), 0 deletions(-)
diff --git a/avy.el b/avy.el
index f2e9520..4c3bb79 100644
--- a/avy.el
+++ b/avy.el
@@ -857,6 +857,7 @@ The window scope is determined by `avy-all-windows' (ARG
negates it)."
(avy--generic-jump regex arg avy-style))))
(declare-function subword-backward "subword")
+(defvar subword-bacward-regexp)
;;;###autoload
(defun avy-goto-subword-0 (&optional arg predicate)
@@ -870,6 +871,8 @@ should return true."
(require 'subword)
(avy-with avy-goto-subword-0
(let ((case-fold-search nil)
+ (subword-backward-regexp
+
"\\(\\(\\W\\|[[:lower:][:digit:]]\\)\\([!-/:@`~[:upper:]]+\\W*\\)\\|\\W\\w+\\)")
candidates)
(avy-dowindows arg
(let ((ws (window-start))
