Move last Org Mode utility function from `db-utils' to `db-org'

This commit is contained in:
Daniel - 2020-06-27 08:56:53 +02:00
parent 0583c08cda
commit 46d9973146
No known key found for this signature in database
GPG Key ID: 1C7071A75BB72D64
3 changed files with 6 additions and 6 deletions

View File

@ -554,7 +554,6 @@
(use-package db-utils
:commands (endless/fill-or-unfill
db/delete-trailing-whitespace-maybe
db/show-current-org-task
db/run-or-hide-shell
db/run-or-hide-ansi-term
db/hex-to-ascii
@ -705,6 +704,7 @@ With given ARG, display files in `db/important-document-path."
db/org-clock-in-break-task
db/org-clock-in-home-task
db/org-clock-in-work-task
db/show-current-org-task
endless/org-ispell
db/org-agenda-list-deadlines
db/org-agenda-skip-tag

View File

@ -315,6 +315,11 @@ In ~%s~:
(dolist (frame (frame-list))
(modify-frame-parameters frame `((name . , org-clock-heading)))))))
(defun db/show-current-org-task ()
"Show title of currently clock in task in modeline."
(interactive)
(message org-clock-current-task))
;;; Fixes

View File

@ -130,11 +130,6 @@ major mode MODE."
(eq major-mode mode)))
(window-list-1)))
(defun db/show-current-org-task ()
"Show title of currently clock in task in modeline."
(interactive)
(message org-clock-current-task))
(defun db/hex-to-ascii (hex-string)
"Convert HEX-STRING to its ASCII equivalent.
Allowed characters in hex-string are hexadecimal digits and