dgnushack.el (declare-function): Ignore the definition defined in subr-fsf.el
authorKatsumi Yamaoka <yamaoka@jpl.org>
Thu, 7 May 2015 06:02:13 +0000 (06:02 +0000)
committerKatsumi Yamaoka <yamaoka@jpl.org>
Thu, 7 May 2015 06:02:13 +0000 (06:02 +0000)
lisp/dgnushack.el

index 8f2a369..404ee12 100644 (file)
 
 (defvar dgnushack-default-load-path (copy-sequence load-path))
 
-(unless (fboundp 'declare-function)
+(when (featurep 'xemacs)
   (defmacro declare-function (fn file &optional arglist fileonly)
     `(eval-when-compile
-       (if (not (fboundp ',fn)) (autoload ',fn ,file)))))
+       (unless (fboundp ',fn) (autoload ',fn ,file)))))
 
 (defalias 'facep 'ignore)