hiro/boon
1
0
Fork 0
mirror of https://github.com/vale981/boon synced 2025-03-04 09:01:39 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

save mark and excursion where needed

Browse source
This commit is contained in:
Jean-Philippe Bernardy 2016-09-29 09:25:17 +02:00
parent 8f0e3d0e44
commit 00f60a7589
3 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
boon-arguments.el
View file

@ -52,8 +52,8 @@
"Return a region list with a single item: the region selected after calling SELECT-FUN (interactively)."
(lambda ()
(save-mark-and-excursion
(call-interactively select-fun)
(boon-regs-from-bounds (cons (region-beginning) (region-end))))))
(call-interactively select-fun)
(boon-regs-from-bounds (cons (region-beginning) (region-end))))))
(defun boon-select-wim () ;; what i mean
"Return a region list with a single item.

2
boon-moves.el
View file

@ -31,7 +31,7 @@
(interactive "P")
(let ((orig-point (point)))
(goto-char
(save-excursion
(save-mark-and-excursion
(deactivate-mark)
(if (boon-in-string-p)
(er/mark-inside-quotes) (er/mark-inside-pairs))

2
boon-pkg.el
View file

@ -2,7 +2,7 @@
"boon"
"0.4"
"Ergonomic Command Mode for Emacs."
'((emacs "24.5")
'((emacs "25.1")
(expand-region "0.10.0")
(dash "2.12.0")
(multiple-cursors "1.3.0"))