bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#17446: 24.4.50; What is the situation around `called-interactively-p


From: Thierry Volpiatto
Subject: bug#17446: 24.4.50; What is the situation around `called-interactively-p'?
Date: Sat, 10 May 2014 08:12:28 +0200
User-agent: mu4e 0.9.9.6pre3; emacs 24.4.50.1

Stefan Monnier <address@hidden> writes:

>> How 'bout the patch below,
>
> BTW, for older Emacsen, you can probably use a hack along the lines of
> the guaranteed 100% untested code below:
>
>    (defun funcall-interactively (fun &rest args)
>      (call-interactively
>        (cond
>         ((consp fun)
>          (mapcar (lambda (x)
>                    (if (eq (car-safe x) 'interactive))
                                                       ^
>                      `(interactive ',args) x)
>                  fun))
>         ((byte-code-function-p)
                                ^ missing arg ?
>          (apply #'make-byte-code
>                 (aref 0 fun)
>                 (aref 1 fun)
>                 (aref 2 fun)
>                 (aref 3 fun)
>                 (aref 4 fun)
>                 `',args)))))

This won't work IMO, why fun would be a cons or a byte-code-function ?
 
-- 
Thierry
Get my Gnupg key:
gpg --keyserver pgp.mit.edu --recv-keys 59F29997 






reply via email to

[Prev in Thread] Current Thread [Next in Thread]