procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove just input mark

Browse source 
* lisp/ibuffer.el (ibuffer-unmark-all): When MARK is not ?\r remove
just MARK.
This commit is contained in:
Tino Calancha 2016-07-08 11:22:34 +09:00
parent 9bf31d1d3f
commit 0e6fa2ddf7
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ibuffer.el
View file

@ -1345,6 +1345,12 @@ With optional ARG, make read-only only if ARG is not negative."
(lambda (_buf _mark)
(ibuffer-set-mark-1 ?\s)
t)))
((not (char-equal mark ?\r))
(ibuffer-map-lines
(lambda (_buf _mark)
(when (char-equal _mark mark)
(ibuffer-set-mark-1 ?\s))
t)))
(t
(ibuffer-map-lines
(lambda (_buf mark)