[Top][All Lists]

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

maybe set `edebug-form-spec' property directly ?

From: John Paul Wallington
Subject: maybe set `edebug-form-spec' property directly ?
Date: Fri, 15 Oct 2004 12:52:44 +0100

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  <address@hidden>

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

reply via email to

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