called-interactively-p

called-interactively-p

[Katsumi Yamaoka]

That's not in XEmacs.  Please don't use it.  Otherwise may I write
a compiler-macro, that replaces it with `interactively-p' in .elc
files, in dgnushack.el?

Re: called-interactively-p

[Katsumi Yamaoka]

Katsumi Yamaoka wrote:
> That's not in XEmacs.  Please don't use it.  Otherwise may I write
> a compiler-macro, that replaces it with `interactively-p' in .elc
> files, in dgnushack.el?

`interactively-p' -> `interactive-p'

Another solution:

(defun function (&optional called-interactively-p)
  (interactive (list t))
  (if called-interactively-p then... else...))

Re: called-interactively-p

[Julien Danjou]

<#secure method=pgpmime mode=sign>
On Wed, Nov 24 2010, Katsumi Yamaoka wrote:

>> That's not in XEmacs.  Please don't use it.  Otherwise may I write
>> a compiler-macro, that replaces it with `interactively-p' in .elc
>> files, in dgnushack.el?

That sounds good. Just add that in gnus-xmas.el I think. :(

> Another solution:
>
> (defun function (&optional called-interactively-p)
>   (interactive (list t))
>   (if called-interactively-p then... else...))

This is what I was trying to avoid and remove. :)

-- 
Julien Danjou
// ᐰ <julien@danjou.info>   http://julien.danjou.info

Re: called-interactively-p

[Lars Magne Ingebrigtsen]

Katsumi Yamaoka <yamaoka@jpl.org> writes:

> That's not in XEmacs.  Please don't use it.  Otherwise may I write
> a compiler-macro, that replaces it with `interactively-p' in .elc
> files, in dgnushack.el?

Perhaps we should just use `interactively-p' instead...  I mean, it's
obsolete in Emacs, but only recently...

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen

Re: called-interactively-p

[Julien Danjou]

[-- Attachment #1: Type: text/plain, Size: 434 bytes --]

On Wed, Nov 24 2010, Lars Magne Ingebrigtsen wrote:

> Perhaps we should just use `interactively-p' instead...  I mean, it's
> obsolete in Emacs, but only recently...

OTOH, considering XEmacs will not implement called-interactively-p,
we'll be at the same place in a few months/years.

So, what about fixing it now for ever (and for XEmacs)? :)

-- 
Julien Danjou
// ᐰ <julien@danjou.info>   http://julien.danjou.info

[-- Attachment #2: Type: application/pgp-signature, Size: 197 bytes --]

Re: called-interactively-p

[Lars Magne Ingebrigtsen]

Julien Danjou <julien@danjou.info> writes:

> OTOH, considering XEmacs will not implement called-interactively-p,
> we'll be at the same place in a few months/years.

Yeah, what's up with XEmacs development?  Is anything happening there
whatsoever?  Perhaps I should subscribe the XEmacs scm list...

> So, what about fixing it now for ever (and for XEmacs)? :)

Yeah, that's probably a better idea.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen

Re: called-interactively-p

[Lars Magne Ingebrigtsen]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> Yeah, what's up with XEmacs development?  Is anything happening there
> whatsoever?  Perhaps I should subscribe the XEmacs scm list...

Apparently not much going on.  8 commits the last week...

And SXEmacs is totally dead now?  The last post to the mailing list was
31 weeks ago.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen

Re: called-interactively-p

[Katsumi Yamaoka]

Lars Magne Ingebrigtsen wrote:
> And SXEmacs is totally dead now?  The last post to the mailing list was
> 31 weeks ago.

The last change was done at November 24 in SXEmacs git.

Cf. http://www.sxemacs.org/

Re: called-interactively-p

[Adam Sjøgren]

On Thu, 25 Nov 2010 00:02:57 +0100, Lars wrote:

> Yeah, what's up with XEmacs development?

Conversion to GPLv3 is still underway...

> Is anything happening there whatsoever?

I am tempted to say that the speed of development is glacial, but with
the rapidly melting glaciers, I'm not sure the comparison is apt.


  ;-),

   Adam

-- 
 "ÅH NEJ, VI HAR EN ØSTERS SOM STATSMINISTER!"                Adam Sjøgren
                                                         asjo@koldfront.dk

Re: called-interactively-p

[Katsumi Yamaoka]

Lars Magne Ingebrigtsen wrote:
> Perhaps we should just use `interactively-p' instead...  I mean, it's
> obsolete in Emacs, but only recently...

That's just what I did in pgg.el.  The Emacs version of pgg.el uses
called-interactively-p.

Re: called-interactively-p

[Katsumi Yamaoka]

Katsumi Yamaoka wrote:
> That's not in XEmacs.  Please don't use it.

Moreover called-interactively-p allows no argument in Emacs<23.2 .

,---- Emacs 23.1 ----
| called-interactively-p is a built-in function in `C source code'.
|
| (called-interactively-p)
|
| Return t if the function using this was called with `call-interactively'.
| [...]
`----

> Otherwise may I write
> a compiler-macro, that replaces it with `interactively-p' in .elc
> files, in dgnushack.el?

I added the following to dgnushack.el temporarily to build Gnus
for all the Emacsen that Gnus should support:

(define-compiler-macro called-interactively-p (&whole form &optional kind)
  (or (condition-case nil
	  (progn (called-interactively-p 'any) nil)
	(wrong-number-of-arguments '(called-interactively-p))
	(void-function '(interactive-p)))
      form))