scip/viking-mode
1
0
Fork 0
mirror of https://codeberg.org/scip/viking-mode.git synced 2025-12-18 04:51:00 +01:00
Code Issues Packages Projects Releases Wiki Activity

avoid calling a kill func if theres nothing left to kill

Browse Source
This commit is contained in:
git@daemon.de
2016-05-25 14:51:10 +02:00
parent d80c032657
commit 5e8726dc6c
1 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
viking-mode.el
View File

@@ -346,10 +346,15 @@ should be a point-moving function."
'viking--current-killf, reset it to the contents of 'viking--current-killf, reset it to the contents of
'viking-kill-funcs if COUNT is 1 (thus the command key has been 'viking-kill-funcs if COUNT is 1 (thus the command key has been
pressed the first time in a row" pressed the first time in a row"
(if (eq count 1) ; start from scratch ;; start from scratch
(if (eq count 1)
(setq viking--current-killf viking-kill-funcs)) (setq viking--current-killf viking-kill-funcs))
(if viking--current-killf ; only call killer if not done killing
(funcall (pop viking--current-killf)))) ;; only call killer if not done killing
(if (and viking--current-killf (not (eobp)))
(funcall (pop viking--current-killf))
(signal 'end-of-buffer nil)
))
;;;;; Public interactive kill functions ;;;;; Public interactive kill functions