branch: externals/dict-tree
commit 0ea66e7a5378e6df44082e4e511a9df6a6d86fc9
Author: Toby S. Cubitt <toby-predict...@dr-qubit.org>
Commit: Toby S. Cubitt <toby-predict...@dr-qubit.org>

    Added fboundp guard around ad-define-subr-args (removed in Emacs-24).
---
 dict-tree.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/dict-tree.el b/dict-tree.el
index ac486f8..5ad959e 100644
--- a/dict-tree.el
+++ b/dict-tree.el
@@ -3607,7 +3607,8 @@ extension, suitable for passing to `load-library'."
    ))
 
 
-;(ad-define-subr-args 'edebug-prin1 '(object &optional printcharfun))
+(when (fboundp 'ad-define-subr-args)
+  (ad-define-subr-args 'edebug-prin1 '(object &optional printcharfun)))
 
 (defadvice edebug-prin1
   (around dictree activate compile preactivate)
@@ -3619,7 +3620,8 @@ extension, suitable for passing to `load-library'."
     ad-do-it)))
 
 
-;(ad-define-subr-args 'edebug-prin1-to-string '(object &optional noescape))
+(when (fboundp 'ad-define-subr-args)
+  (ad-define-subr-args 'edebug-prin1-to-string '(object &optional noescape)))
 
 (defadvice edebug-prin1-to-string
   (around dictree activate compile preactivate)

Reply via email to