From c8e22f94fc0fbbb4568b382e6e3ce593a99ad914 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Mon, 14 Aug 2023 18:04:29 +1000 Subject: [emacs] Some minor tweaks --- emacs/.emacs.d/lisp/my/my-org.el | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'emacs/.emacs.d/lisp/my/my-org.el') diff --git a/emacs/.emacs.d/lisp/my/my-org.el b/emacs/.emacs.d/lisp/my/my-org.el index 0fb7d9e..63db9fa 100644 --- a/emacs/.emacs.d/lisp/my/my-org.el +++ b/emacs/.emacs.d/lisp/my/my-org.el @@ -113,6 +113,17 @@ With a prefix, insert inactive dates. (my-kill-forward) (org-kill-line))) +(defun my-org-kill-line-backwards (&optional arg) + "Kill backwards in an org way, or `my-kill-backward' with a prefix arg." + (interactive "P") + (if arg + (my-kill-backward) + (if (bolp) + (delete-char -1) + (kill-region + (save-excursion (my-org-beginning-of-line-or-indent) (point)) + (point))))) + (defun my-org-open-default-notes-file () (interactive) (find-file org-default-notes-file)) -- cgit v1.2.3