diff options
author | Yuchen Pei <id@ypei.org> | 2023-07-03 20:11:53 +1000 |
---|---|---|
committer | Yuchen Pei <id@ypei.org> | 2023-07-03 20:11:53 +1000 |
commit | e1640aa343f3b7c050ad525b508cea2ee9a48ce4 (patch) | |
tree | 59c80d81ec3f9ace008b3993402e2261b274867f /emacs/.emacs.d/lisp/my | |
parent | 5686d46326931ad67615086c7eaffb2013fae6d9 (diff) |
minor changes
Diffstat (limited to 'emacs/.emacs.d/lisp/my')
-rw-r--r-- | emacs/.emacs.d/lisp/my/my-editing.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-editing.el b/emacs/.emacs.d/lisp/my/my-editing.el index 975b9ae..1a3747e 100644 --- a/emacs/.emacs.d/lisp/my/my-editing.el +++ b/emacs/.emacs.d/lisp/my/my-editing.el @@ -330,11 +330,11 @@ Basically move the line up (forward-char col))) (defun my-kill-line (&optional arg) - "Calls `my-kill-forward' or `kill-line' in case of prefix arg." + "Calls `kill-line', or `my-kill-forward' in case of prefix arg." (interactive "P") (if arg - (kill-line) - (my-kill-forward))) + (my-kill-forward) + (kill-line))) (defun my-kill-forward () "Kill towards end of line, but not out of sexp." @@ -355,11 +355,11 @@ Basically move the line up (kill-region (point) end)))) (defun my-kill-line-backward (&optional arg) - "Calls `my-kill-backward' or `kill-line' with 0 in case of prefix arg." + "Calls `kill-line' with 0, or `my-kill-backward' in case of prefix arg." (interactive "P") (if arg - (kill-line 0) - (my-kill-backward))) + (my-kill-backward) + (kill-line 0))) (defun my-kill-backward () "Kill towards beginning of line, but not out of sexp." |