ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2026-02-04 06:42:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Allow "C-h" to delete for avy-goto-char-timer

Browse Source 
Fixes #193
This commit is contained in:
ketanaka
2017-04-11 21:09:29 +09:00
committed by Oleh Krehel
parent 105efc8482
commit f2bedeeb58
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
avy.el
View File

@@ -1625,10 +1625,10 @@ saves the line(s) as if killed, but does not kill it(them)."
:type 'float)
(defun avy--read-candidates ()
"Read as many chars as possible and return their occurences.
At least one char must be read, and then repeatedly one next char
may be read if it is entered before `avy-timeout-seconds'. `DEL'
deletes the last char entered, and `RET' exits with the currently
"Read as many chars as possible and return their occurences.
At least one char must be read, and then repeatedly one next char
may be read if it is entered before `avy-timeout-seconds'. `C-h'
or `DEL' deletes the last char entered, and `RET' exits with the
currently read string immediately instead of waiting for another
char for `avy-timeout-seconds'.
The format of the result is the same as that of `avy--regex-candidates'.
@@ -1651,8 +1651,8 @@ This function obeys `avy-all-windows' setting."
(setq overlays nil)
(cond
;; Handle RET
((= char 13)
(setq break t))
((= char 13)
(setq break t))
;; Handle C-h, DEL
((memq char '(8 127))
(let ((l (length str)))