From 12ab6a7d3a6b68fb4f688354659cb7de7a567b1f Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Sun, 17 May 1998 01:55:17 +0000 Subject: [PATCH] (hs-life-goes-on): Use Emacs' native backquote support. --- lisp/progmodes/hideshow.el | 7 ++++--- 1 file 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)) -- 2.39.2