[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] Stop clock on closing emacs

From: Sebastien Vauban
Subject: Re: [O] Stop clock on closing emacs
Date: Mon, 03 Feb 2014 13:39:25 +0100
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (windows-nt)

Igor Sosa Mayor wrote:
> Am Sat, Feb 01, 2014 at 01:03:07PM +0100, Florian Beck wrote:
>> Use `kill-emacs-hook':
>> (defun org-clock-out-maybe ()
>>   "Stop a currently running clock."
>>   (org-clock-out nil t))
>> (add-hook 'kill-emacs-hook 'org-clock-out-maybe)
> Thanks a lot. This is much better. But: are you really using this idea?

A variation:

--8<---------------cut here---------------start------------->8---
    ;; ask the user if they wish to clock out before killing Emacs
    (defun my/org-query-clock-out ()
      "Ask the user before clocking out.
    This is a useful function for adding to `kill-emacs-query-functions'."
      (if (and (featurep 'org-clock)
               (funcall 'org-clocking-p)
               (y-or-n-p "You are currently clocking time, clock out? "))
        t))                             ; only fails on keyboard quit or error

    (add-hook 'kill-emacs-query-functions 'my/org-query-clock-out)
--8<---------------cut here---------------end--------------->8---

Best regards,

Sebastien Vauban

reply via email to

[Prev in Thread] Current Thread [Next in Thread]