Delete, don't kill, dir dir fragments in icomplete-fido-backward-updir

Reported by: Andrew Schwartzmeyer <andrew@schwartzmeyer.com>

* lisp/icomplete.el (icomplete-fido-backward-updir): Don't save
dir fragments to kill ring.
This commit is contained in:
João Távora 2020-06-13 18:45:40 +01:00
parent 6cdecc2659
commit 079b0dc430

View file

@ -300,7 +300,10 @@ if that doesn't produce a completion match."
(interactive)
(if (and (eq (char-before) ?/)
(eq (icomplete--category) 'file))
(zap-up-to-char -1 ?/)
(save-excursion
(goto-char (1- (point)))
(when (search-backward "/" (point-min) t)
(delete-region (1+ (point)) (point-max))))
(call-interactively 'backward-delete-char)))
(defvar icomplete-fido-mode-map