Re: An unusual problem?

[Johan Bockgård]

John Taylor <jt319@cam.ac.uk> writes:

> bojohan+news@dd.chalmers.se (Johan Bockgård) writes:
>> Use C-h v (describe-variable).
>> 
>> The docstring says:
>> 
>>     Functions to call with no arguments to query about killing Emacs.
>>     If any of these functions returns nil, killing Emacs is cancelled.
>>     `save-buffers-kill-emacs' (C-x C-c) calls these functions, but
>>     `kill-emacs', the low level primitive, does not. See also
>>     `kill-emacs-hook'.
>> 
>
> All I get is this: 
> 'kill-emacs-query-functions's value is 
> (timeclock-query-out)'
>
> What do I need to do - change the variable to 't' somewhere?!?

In the development version of emacs the function's definition is this:

(defun timeclock-query-out ()
  "Ask the user whether to clock out.
This is a useful function for adding to `kill-emacs-query-functions'."
  (and (equal (car timeclock-last-event) "i")
       (y-or-n-p "You're currently clocking time, clock out? ")
       (timeclock-out))
  ;; Unconditionally return t for `kill-emacs-query-functions'.
  t)

In your version it may return nil.

You could patch the function or wrap it in a function that always
returns `t' and add that to kill-emacs-query-functions instead.

That is, replace

(add-hook 'kill-emacs-query-functions 'timeclock-query-out)

with

(add-hook 'kill-emacs-query-functions (lambda () (timeclock-query-out) t))

-- 
Johan Bockgård