How about setting the `edebug-form-spec' property rather than
conditionally calling `def-edebug-spec' ?

(If you would prefer to call `def-edebug-spec' then `functionp' is the
wrong test and `fboundp' should be used instead because
`def-edebug-spec' is a macro.)

--- tramp.el    10 Oct 2004 17:48:44 +0100      2.401
+++ tramp.el    15 Oct 2004 10:19:34 +0100      
@@ -1728,10 +1728,9 @@
 (put 'with-parsed-tramp-file-name 'lisp-indent-function 2)
 ;; To be activated for debugging containing this macro.
 ;; It works only when VAR is nil.  Otherwise, it can be deactivated by
-;; (def-edebug-spec with-parsed-tramp-file-name 0)
+;; (put 'with-parsed-tramp-file-name 'edebug-form-spec 0)
 ;; I'm too stupid to write a precise SPEC for it.
-(if (functionp 'def-edebug-spec)
-  (def-edebug-spec with-parsed-tramp-file-name t))
+(put 'with-parsed-tramp-file-name 'edebug-form-spec t)
 
 (defmacro tramp-let-maybe (variable value &rest body)
   "Let-bind VARIABLE to VALUE in BODY, but only if VARIABLE is not obsolete.

2004-10-15  John Paul Wallington  <[EMAIL PROTECTED]>

        * tramp.el (top): Set `edebug-form-spec' property directly rather
        than calling `def-edebug-spec'.


_______________________________________________
Tramp-devel mailing list
[EMAIL PROTECTED]
http://lists.nongnu.org/mailman/listinfo/tramp-devel

Reply via email to