Function: org-check-running-clock
org-check-running-clock is a byte-compiled function defined in
org.el.gz.
Signature
(org-check-running-clock)
Documentation
Check if the current buffer contains the running clock.
If yes, offer to stop it and to save the buffer with the changes.
Source Code
;; Defined in /usr/src/emacs/lisp/org/org.el.gz
(defun org-check-running-clock ()
"Check if the current buffer contains the running clock.
If yes, offer to stop it and to save the buffer with the changes."
(when (and (equal (marker-buffer org-clock-marker) (current-buffer))
(y-or-n-p (format "Clock-out in buffer %s before killing it? "
(buffer-name))))
(org-clock-out)
(when (y-or-n-p "Save changed buffer?")
(save-buffer))))