Mercurial > emacs
comparison src/callint.c @ 54641:77a99ef5c0ae
(Fcall_interactively): Fix last change.
From David Ponce <david@dponce.com>
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Mon, 29 Mar 2004 11:45:11 +0000 |
| parents | f4cfaf943252 |
| children | 6258852d3607 |
comparison
equal
deleted
inserted
replaced
| 54640:371824673463 | 54641:77a99ef5c0ae |
|---|---|
| 349 } | 349 } |
| 350 else | 350 else |
| 351 { | 351 { |
| 352 Lisp_Object form; | 352 Lisp_Object form; |
| 353 GCPRO2 (function, prefix_arg); | 353 GCPRO2 (function, prefix_arg); |
| 354 Finteractive_form (function); | 354 form = Finteractive_form (function); |
| 355 UNGCPRO; | 355 UNGCPRO; |
| 356 if (CONSP (form)) | 356 if (CONSP (form)) |
| 357 specs = filter_specs = Fcar (XCDR (form)); | 357 specs = filter_specs = Fcar (XCDR (form)); |
| 358 else | 358 else |
| 359 goto lose; | 359 goto lose; |