diff options
author | Dave Love <fx@gnu.org> | 2000-01-28 22:10:18 +0000 |
---|---|---|
committer | Dave Love <fx@gnu.org> | 2000-01-28 22:10:18 +0000 |
commit | 4ce72c0d79ad0344cc22156fd9ad6d1a0e01033d (patch) | |
tree | 0a49158755afc1e7143668c44be3a614c4d8ff3b /lisp/subr.el | |
parent | d060bc9f7e8f143a82e459b99c46c936eb85c021 (diff) | |
download | emacs-4ce72c0d79ad0344cc22156fd9ad6d1a0e01033d.tar.gz |
Move out indent and edebug specs for when and unless.
Diffstat (limited to 'lisp/subr.el')
-rw-r--r-- | lisp/subr.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index f4976eeb083..7afcf867153 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -69,14 +69,10 @@ change the list." (defmacro when (cond &rest body) "(when COND BODY...): if COND yields non-nil, do BODY, else return nil." (list 'if cond (cons 'progn body))) -(put 'when 'lisp-indent-function 1) -(put 'when 'edebug-form-spec '(&rest form)) (defmacro unless (cond &rest body) "(unless COND BODY...): if COND yields nil, do BODY, else return nil." (cons 'if (cons cond (cons nil body)))) -(put 'unless 'lisp-indent-function 1) -(put 'unless 'edebug-form-spec '(&rest form)) (defmacro dolist (spec &rest body) "(dolist (VAR LIST [RESULT]) BODY...): loop over a list. |