feat(emacs): add meow-yank-above
command
Signed-off-by: Lucas Sta Maria <lucas@priime.dev>
This commit is contained in:
parent
ffb1e9dc45
commit
a44d670dc9
1 changed files with 8 additions and 0 deletions
|
@ -61,6 +61,13 @@
|
||||||
;; meow
|
;; meow
|
||||||
(meow-global-mode)
|
(meow-global-mode)
|
||||||
|
|
||||||
|
(defun meow-yank-above ()
|
||||||
|
"Yank the killed text to the line above."
|
||||||
|
(interactive)
|
||||||
|
(save-excursion
|
||||||
|
(move-beginning-of-line nil)
|
||||||
|
(meow-yank)))
|
||||||
|
|
||||||
(defun meow-change-line ()
|
(defun meow-change-line ()
|
||||||
"Kill rest of line and switch to insert state."
|
"Kill rest of line and switch to insert state."
|
||||||
(interactive)
|
(interactive)
|
||||||
|
@ -144,6 +151,7 @@
|
||||||
'("x" . meow-save)
|
'("x" . meow-save)
|
||||||
'("X" . meow-sync-grab)
|
'("X" . meow-sync-grab)
|
||||||
'("y" . meow-yank)
|
'("y" . meow-yank)
|
||||||
|
'("Y" . meow-yank-above)
|
||||||
'("z" . meow-pop-selection)
|
'("z" . meow-pop-selection)
|
||||||
'("'" . repeat)
|
'("'" . repeat)
|
||||||
'("<escape>" . ignore)))
|
'("<escape>" . ignore)))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue