(define-minor-mode): Improve the spec and remove the rogue second spec.
This commit is contained in:
parent
6a84719a02
commit
9eab649a37
1 changed files with 5 additions and 4 deletions
|
@ -1988,9 +1988,12 @@ expressions; a `progn' form will be returned enclosing these forms."
|
|||
(def-edebug-spec defmacro
|
||||
(&define name lambda-list def-body))
|
||||
(def-edebug-spec define-derived-mode
|
||||
(&define name name stringp [&optional stringp] def-body))
|
||||
(&define name symbolp stringp [&optional stringp] def-body))
|
||||
(def-edebug-spec define-minor-mode
|
||||
(&define name stringp def-body))
|
||||
(&define name stringp
|
||||
[&optional sexp sexp &or consp symbolp]
|
||||
[&rest [keywordp sexp]]
|
||||
def-body))
|
||||
;; This plain doesn't work ;-( -sm
|
||||
;; (def-edebug-spec define-skeleton
|
||||
;; (&define name stringp def-body))
|
||||
|
@ -2136,8 +2139,6 @@ expressions; a `progn' form will be returned enclosing these forms."
|
|||
|
||||
(def-edebug-spec sregexq (&rest sexp))
|
||||
|
||||
(def-edebug-spec define-minor-mode (symbolp stringp body))
|
||||
|
||||
;;; The debugger itself
|
||||
|
||||
(defvar edebug-active nil) ;; Non-nil when edebug is active
|
||||
|
|
Loading…
Add table
Reference in a new issue