aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorStefan Monnier2014-05-18 08:58:30 -0400
committerStefan Monnier2014-05-18 08:58:30 -0400
commit08a2434e2f7a60fc558e052e37409333582504cb (patch)
tree0fdc023b08f78ad8fbd3950777fdf52e389fb298 /src
parent2f826609630cc1bf1d470428273711ebde9eec3c (diff)
downloademacs-08a2434e2f7a60fc558e052e37409333582504cb.tar.gz
emacs-08a2434e2f7a60fc558e052e37409333582504cb.zip
* lisp/emacs-lisp/timer.el (timer-event-handler): Don't run if canceled.
Fixes: debbugs:17392
Diffstat (limited to 'src')
-rw-r--r--src/minibuf.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/minibuf.c b/src/minibuf.c
index cd108d88ecc..c3fcbeb59c7 100644
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -396,7 +396,8 @@ read_minibuf (Lisp_Object map, Lisp_Object initial, Lisp_Object prompt,
396 in previous recursive minibuffer, but was not set explicitly 396 in previous recursive minibuffer, but was not set explicitly
397 to t for this invocation, so set it to nil in this minibuffer. 397 to t for this invocation, so set it to nil in this minibuffer.
398 Save the old value now, before we change it. */ 398 Save the old value now, before we change it. */
399 specbind (intern ("minibuffer-completing-file-name"), Vminibuffer_completing_file_name); 399 specbind (intern ("minibuffer-completing-file-name"),
400 Vminibuffer_completing_file_name);
400 if (EQ (Vminibuffer_completing_file_name, Qlambda)) 401 if (EQ (Vminibuffer_completing_file_name, Qlambda))
401 Vminibuffer_completing_file_name = Qnil; 402 Vminibuffer_completing_file_name = Qnil;
402 403