Add org active/inactive current time stamp functions

This commit is contained in:
Gerard Vermeulen 2022-09-02 15:02:51 +02:00
parent dd585264c2
commit 5f2a01f1be

View File

@ -776,6 +776,7 @@ defined in this Org file.
"Org"
(by-backend :no-manual t)
(by-backend-kbd-org-macro :no-manual t)
(org-active-current-time-stamp :nomanual t)
(org-babel-execute:latex-extra-header :no-manual t)
(org-babel-execute:latex-header :no-manual t)
(org-electric-dollar :no-manual t)
@ -783,6 +784,7 @@ defined in this Org file.
(org-eval-python-setup-blocks :no-manual t)
(org-eval-infixed-blocks :no-manual t)
(org-latex-engraved-source-block-filter :no-manual t)
(org-inactive-current-time-stamp :nomanual t)
(org-syntax-convert-keyword-case-to-lower :no-manual t)
(smart-latex-engrave-org-source-blocks :no-manual t)
(toggle-engrave-faces-latex-face-apply-override :no-manual t)
@ -1952,6 +1954,20 @@ backward compatibility. See table [[tab:org-latex-class-tag-placeholder]] and ty
(backward-char 2)))
(with-eval-after-load 'org
(defun org-active-current-time-stamp ()
"Insert an active date-time stamp of the current time."
(interactive)
(org-insert-time-stamp (current-time) 'with-hm))
(defun org-inactive-current-time-stamp ()
"Insert an inactive date-time stamp of the current time."
(interactive)
(org-insert-time-stamp (current-time) 'with-hm 'inactive))
(define-key org-mode-map
(kbd "C-c <SPC>") #'org-inactive-current-time-stamp)
(define-key org-mode-map
(kbd "C-x <SPC>") #'org-active-current-time-stamp)
(define-key org-mode-map (kbd "$") #'org-electric-dollar)
(define-key org-mode-map (kbd "M-q") #'org-fill-paragraph)))
#+end_src