From 4f8959185a33b31ae2f2a4b182172d0d6f0a42c4 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 21 Dec 2000 20:40:40 +0000 Subject: [PATCH] (Fcall_interactively): Prevent a compiler warning. --- src/callint.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/callint.c b/src/callint.c index 5289bfa3853..df3ada4f04a 100644 --- a/src/callint.c +++ b/src/callint.c @@ -1,5 +1,6 @@ /* Call a Lisp function interactively. - Copyright (C) 1985, 86, 93, 94, 95, 1997 Free Software Foundation, Inc. + Copyright (C) 1985, 86, 93, 94, 95, 1997, 2000 + Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -236,6 +237,8 @@ supply if the command inquires which events were used to invoke it.") if (SYMBOLP (function)) enable = Fget (function, Qenable_recursive_minibuffers); + else + enable = Qnil; fun = indirect_function (function); -- 2.39.2