Fix fix_command for non-symbol functions

* src/callint.c (fix_command): Don't bug out on commands that
aren't symbols (like lambdas, for instance).

diff --git a/src/callint.c b/src/callint.c
index c974967459c076fa3f0baf05d308482ae0d63626..8ef0e5240a5eac865688ea5837401b7b6b8fc6e0 100644 (file)
--- a/src/callint.c
+++ b/src/callint.c
@@ -171,7 +171,7 @@ static void
 fix_command (Lisp_Object function, Lisp_Object values)
 {
   /* Quick exit if there's no values to alter.  */
-  if (!CONSP (values))
+  if (!CONSP (values) || !SYMBOLP (function))
     return;
 
   Lisp_Object reps = Fget (function, Qinteractive_args);