sqrtminusone/org-journal-tags
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/org-journal-tags.git synced 2025-12-10 10:53:04 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat: add refactoring to the keymap

Browse source
This commit is contained in:
Pavel Korytov 2022-04-16 17:59:38 +03:00
parent 11a39f8abd
commit 2552a7a7fb
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
org-journal-tags.el
View file

@ -1664,6 +1664,7 @@ BODY is put in that lambda."
(define-key map (kbd "o") (org-journal-tags--with-close-status
(org-journal-open-current-journal-file)))
(define-key map (kbd "?") #'org-journal-tags--status-transient-help)
(define-key map (kbd "r") #'org-journal-tags-refactor)
(define-key map (kbd "RET") #'widget-button-press)
(define-key map (kbd "q") (lambda ()
(interactive)
@ -1678,6 +1679,7 @@ BODY is put in that lambda."
"o" (org-journal-tags--with-close-status
(org-journal-open-current-journal-file))
"?" #'org-journal-tags--status-transient-help
"r" #'org-journal-tags-refactor
"q" (lambda ()
(interactive)
(quit-window t))))
@ -1692,6 +1694,7 @@ BODY is put in that lambda."
("M-2" "Show level 2" magit-section-show-level-2-all)]
["Org Journal"
("s" "New query" org-journal-tags-transient-query)
("r" "Rename tag" org-journal-tags-refactor)
("n" "New journal entry" (lambda nil
(interactive)
(when (eq major-mode 'org-journal-tags-status-mode)