diff options
Diffstat (limited to 'users/glittershark/emacs.d/clocked-in-elt.el')
-rw-r--r-- | users/glittershark/emacs.d/clocked-in-elt.el | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/users/glittershark/emacs.d/clocked-in-elt.el b/users/glittershark/emacs.d/clocked-in-elt.el deleted file mode 100644 index 00fda047e4a9..000000000000 --- a/users/glittershark/emacs.d/clocked-in-elt.el +++ /dev/null @@ -1,18 +0,0 @@ -;;; ~/.doom.d/clocked-in-elt.el -*- lexical-binding: t; -*- -;;; -(load (expand-file-name "init" (or (getenv "EMACSDIR") - (expand-file-name - "../.emacs.d" - (file-name-directory (file-truename load-file-name)))))) - -(require 'org-clock) -(require 'org-element) - -(let ((item (or org-clock-marker - (car org-clock-history)))) - (when item - (with-current-buffer (marker-buffer item) - (goto-char (marker-position item)) - (let ((element (org-element-at-point))) - (when (eq 'headline (car element)) - (message "%s" (plist-get (cadr element) :raw-value))))))) |