Re: Interactive hat. [Was: CUA-like stuff spuriously enables transient-mark-mode]

[Alan Mackenzie]

Hi, Juanma,

On Wed, Mar 25, 2009 at 12:26:58PM +0100, Juanma Barranquero wrote:
> On Wed, Mar 25, 2009 at 11:16, Alan Mackenzie <address@hidden> wrote:

> > The next try is to use a macro which will generate an appropriate
> > interactive string.  Something like:

> >   (defmacro foo-interactive (s-22 s-23)
> >       "doc string"
> >       `(interactive ,(if (emacs-got-interactive-hat) s-23 s22)))

> > , but I can't get defun to take a macro-generated interactive string.  I
> > suspect it's not possible.  It seems to work, sort of, in byte-compiled
> > defuns.

> It is not possible to use the `interactive-form' symbol property, as
> documented in (elisp)"21.2.1 Using `interactive'" ?

I don't think so.  `interactive-form' is a DEFUN (in data.c) which hoiks
the interactive string out of three different places for three different
sorts of defun.  There's currently no `put-interactive-form', but
there's no reason why one couldn't be written.

>     Juanma

-- 
Alan Mackenzie (Nuremberg, Germany).