diff options
| author | Dan Nicolaescu <done@ece.arizona.edu> | 1998-05-17 01:55:17 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <done@ece.arizona.edu> | 1998-05-17 01:55:17 +0000 |
| commit | ef03e04a507ac2bcea3109969df8ceeac1d73862 (patch) | |
| tree | 5641de97e20a22fcc21eb3cfd23472bbe3111b4d | |
| parent | deb92faba643a87716ad127561823fbfed145360 (diff) | |
| download | emacs-ef03e04a507ac2bcea3109969df8ceeac1d73862.tar.gz | |
(hs-life-goes-on): Use Emacs' native backquote support.
| -rw-r--r-- | lisp/progmodes/hideshow.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index 51c4452ea74..885ac0c6bee 100644 --- a/lisp/progmodes/hideshow.el +++ b/lisp/progmodes/hideshow.el @@ -555,9 +555,10 @@ Return point, or nil if top-level." (defmacro hs-life-goes-on (&rest body) "Executes optional BODY iff variable `hs-minor-mode' is non-nil." - (` (let ((inhibit-point-motion-hooks t)) - (when hs-minor-mode - (,@ body))))) + `(let ((inhibit-point-motion-hooks t)) + (when hs-minor-mode + ,@body))) + (put 'hs-life-goes-on 'edebug-form-spec '(&rest form)) |