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

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

Re: allout compatibility layer


From: Stefan Monnier
Subject: Re: allout compatibility layer
Date: Sun, 05 Mar 2006 16:20:24 -0500
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux)

> (when (featurep 'xemacs)
>   (defun allout-mark-topic () (outline-mark-topic))
>   ...)

If I were you I wouldn't check (featurep 'xemacs) since the XEmacs package
may also switch to the "allout-" prefix in the future and because Emacs also
used the "outline-" prefix until very recently (e.g. in Emacs-21.4).
You could check (fboundp 'allout-mark-topic) or (fboundp
'outline-mark-topic).

As for what you want to do, you can do

  (defun allout-mark-topic (&rest args) (apply 'outline-mark-topic args))

which will just pass whichever args are provided.  But what you really want
to use instead is:

  (defalias 'allout-mark-topic 'outline-mark-topic)


-- Stefan


reply via email to

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