From eccf84d6b0da040e15ae0ea736b4348a149ecb84 Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Sun, 1 Oct 2017 16:02:20 +0200 Subject: [PATCH] =?UTF-8?q?[Org]=20Don=E2=80=99t=20show=20file=20name=20of?= =?UTF-8?q?=20currently=20running=20clock?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- site-lisp/db-org.el | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el index 9bd3e2b..c4b07ab 100644 --- a/site-lisp/db-org.el +++ b/site-lisp/db-org.el @@ -217,12 +217,8 @@ forces clocking in of the default task." (with-temp-file db/org-clock-current-task-file (let ((clock-buffer (marker-buffer org-clock-marker))) (if (null clock-buffer) - (insert "No running clock")) - (let ((current-task org-clock-heading) - (current-file (file-name-sans-extension - (file-name-nondirectory - (buffer-file-name clock-buffer))))) - (insert current-file "/" current-task))))) + (insert "No running clock") + (insert org-clock-heading))))) (add-hook 'org-clock-in-hook #'db/org-current-task)