Mercurial > emacs
comparison src/callint.c @ 84523:803a3c8107e8
Johan Bockg? <bojohan at gnu.org>
(Fcall_interactively): Remove unused var `fun'.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Thu, 13 Sep 2007 05:50:11 +0000 |
parents | b51e2df52bfb |
children | cdd30283527d bdb3fe0ba9fa |
comparison
equal
deleted
inserted
replaced
84522:1c7c7eeafbb7 | 84523:803a3c8107e8 |
---|---|
261 `this-command-keys-vector' is used. */) | 261 `this-command-keys-vector' is used. */) |
262 (function, record_flag, keys) | 262 (function, record_flag, keys) |
263 Lisp_Object function, record_flag, keys; | 263 Lisp_Object function, record_flag, keys; |
264 { | 264 { |
265 Lisp_Object *args, *visargs; | 265 Lisp_Object *args, *visargs; |
266 Lisp_Object fun; | |
267 Lisp_Object specs; | 266 Lisp_Object specs; |
268 Lisp_Object filter_specs; | 267 Lisp_Object filter_specs; |
269 Lisp_Object teml; | 268 Lisp_Object teml; |
270 Lisp_Object up_event; | 269 Lisp_Object up_event; |
271 Lisp_Object enable; | 270 Lisp_Object enable; |
314 | 313 |
315 if (SYMBOLP (function)) | 314 if (SYMBOLP (function)) |
316 enable = Fget (function, Qenable_recursive_minibuffers); | 315 enable = Fget (function, Qenable_recursive_minibuffers); |
317 else | 316 else |
318 enable = Qnil; | 317 enable = Qnil; |
319 | |
320 fun = indirect_function (function); | |
321 | 318 |
322 specs = Qnil; | 319 specs = Qnil; |
323 string = 0; | 320 string = 0; |
324 /* The idea of FILTER_SPECS is to provide away to | 321 /* The idea of FILTER_SPECS is to provide away to |
325 specify how to represent the arguments in command history. | 322 specify how to represent the arguments in command history. |