(function-p-func): Avoid `xemacs-p'.

This commit is contained in:
Stefan Monnier 2002-11-07 23:01:30 +00:00
parent 6d736b085c
commit 38c1b27aa5

View file

@ -1060,7 +1060,7 @@ at the moment are:
object)
(defconst function-p-func
(if (eshell-under-xemacs-p)
(if (fboundp 'compiled-function-p)
'compiled-function-p
'byte-code-function-p))