fix(emacs): Replace removed activities-save

`activities-save` had been removed upstream, I currently replace it by
delegating to `activities-define`.
This commit is contained in:
Alexander Kobjolke 2024-04-23 22:09:35 +02:00
parent ecbd17070b
commit dac82b522e

View file

@ -87,7 +87,15 @@
(use-package! org-ql)
(use-package! org-bookmark-heading)
(defun ak/activities-define--with-prefix-arg ()
"Call 'C-u activities-define' in order to save the current activity."
(interactive)
(let ((current-prefix-arg '(4)))
(call-interactively #'activities-define)))
(use-package! activities
:demand t
:config
(activities-mode)
(activities-tabs-mode)
@ -97,7 +105,7 @@
:desc "Resume activity" "r" #'activities-resume
:desc "Create new activity" "n" #'activities-new
:desc "List activities" "l" #'activities-list
:desc "Save current activity " "s" #'activities-save
:desc "Save current activity " "s" #'ak/activities-define--with-prefix-arg
:desc "Save all activities" "S" #'activities-save-all
:desc "Revert activity to default" "R" #'activities-revert
)