aboutsummaryrefslogtreecommitdiff
path: root/emacs/.emacs.d/lisp
diff options
context:
space:
mode:
authorYuchen Pei <id@ypei.org>2023-07-03 20:11:53 +1000
committerYuchen Pei <id@ypei.org>2023-07-03 20:11:53 +1000
commite1640aa343f3b7c050ad525b508cea2ee9a48ce4 (patch)
tree59c80d81ec3f9ace008b3993402e2261b274867f /emacs/.emacs.d/lisp
parent5686d46326931ad67615086c7eaffb2013fae6d9 (diff)
minor changes
Diffstat (limited to 'emacs/.emacs.d/lisp')
-rw-r--r--emacs/.emacs.d/lisp/my/my-editing.el12
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."