[elpa] master 53d457c 18/78: Add misc punctuation to subword commands

[Oleh Krehel]

branch: master
commit 53d457cfe48956a1cbffb7f0f6d735af322fd093
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    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))