emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/transient 879f45f0c9 184/366: transient--with-emergency


From: Jonas Bernoulli
Subject: [elpa] externals/transient 879f45f0c9 184/366: transient--with-emergency-exit: Define earlier
Date: Tue, 25 Jan 2022 18:54:39 -0500 (EST)

branch: externals/transient
commit 879f45f0c9a88967365eec9e534a7df1d78d9240
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    transient--with-emergency-exit: Define earlier
---
 lisp/transient.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index b18cd03ed2..10ed3d2923 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -89,6 +89,12 @@
 (define-obsolete-variable-alias 'post-transient-hook
   'transient-exit-hook "Transient 0.3.0")
 
+(defmacro transient--with-emergency-exit (&rest body)
+  (declare (indent defun))
+  `(condition-case err
+       ,(macroexp-progn body)
+     (error (transient--emergency-exit err))))
+
 ;;; Options
 
 (defgroup transient nil
@@ -1980,12 +1986,6 @@ nil, then do nothing."
 
 (add-hook 'debugger-mode-hook 'transient--emergency-exit)
 
-(defmacro transient--with-emergency-exit (&rest body)
-  (declare (indent defun))
-  `(condition-case err
-       ,(macroexp-progn body)
-     (error (transient--emergency-exit err))))
-
 ;;; Pre-Commands
 
 (defun transient--do-stay ()



reply via email to

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