diff options
author | Kyle Meyer <kyle@kyleam.com> | 2015-08-21 23:22:20 -0400 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2015-08-21 23:22:20 -0400 |
commit | 6d1863a20bc4c71c38694ba83227b5145f8e2882 (patch) | |
tree | 59f2171ab16fceff4a9c43756c35d833772b6684 /lisp/init-ace.el | |
parent | 2a155877c828a10db7a7e2d7b065e921fd031434 (diff) | |
download | emacs.d-6d1863a20bc4c71c38694ba83227b5145f8e2882.tar.gz |
Remove km/avy-goto-subword-1
This is fixed upstream as of a6cfeda ("avy.el (avy-goto-subword-0):
Don't offer invisible chars", 2015-08-21).
Diffstat (limited to 'lisp/init-ace.el')
-rw-r--r-- | lisp/init-ace.el | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/lisp/init-ace.el b/lisp/init-ace.el index cc6eee3..3417013 100644 --- a/lisp/init-ace.el +++ b/lisp/init-ace.el @@ -2,16 +2,7 @@ (require 'avy) -(defun km/avy-goto-subword-1 (char arg) - "Like `avy-goto-subword-1', but don't consider invisible text." - (interactive (list (read-char "char: ") current-prefix-arg)) - (avy--with-avy-keys avy-goto-subword-1 - (let ((char (downcase char))) - (avy-goto-subword-0 - arg (lambda () (and (not (invisible-p (point))) - (eq (downcase (char-after)) char))))))) - -(key-chord-define-global "jf" 'km/avy-goto-subword-1) +(key-chord-define-global "jf" 'avy-goto-subword-1) ;;; Ace Link |