summaryrefslogtreecommitdiff
path: root/src/callint.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/callint.c')
-rw-r--r--src/callint.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/callint.c b/src/callint.c
index dcda0bcf7a0..c713e08d4d4 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -357,9 +357,7 @@ invoke it. If KEYS is omitted or nil, the return value of
/* Compute the arg values using the user's expression. */
specs = Feval (specs,
CONSP (funval) && EQ (Qclosure, XCAR (funval))
- ? CAR_SAFE (XCDR (funval))
- : COMPILEDP (funval) && INTEGERP (AREF (funval, COMPILED_ARGLIST))
- ? Qt : Qnil);
+ ? CAR_SAFE (XCDR (funval)) : Qnil);
if (events != num_input_events || !NILP (record_flag))
{
/* We should record this command on the command history. */