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

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

[elpa] externals/beardbolt 495d481a94 136/323: Move rmsbolt-command init


From: ELPA Syncer
Subject: [elpa] externals/beardbolt 495d481a94 136/323: Move rmsbolt-command initialization to end
Date: Thu, 9 Mar 2023 10:58:24 -0500 (EST)

branch: externals/beardbolt
commit 495d481a94829badbecef755891fc66531b30117
Author: Jay Kamat <jaygkamat@gmail.com>
Commit: Jay Kamat <jaygkamat@gmail.com>

    Move rmsbolt-command initialization to end
---
 rmsbolt.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/rmsbolt.el b/rmsbolt.el
index 2cbb53f38d..e5b399fa8d 100644
--- a/rmsbolt.el
+++ b/rmsbolt.el
@@ -1034,18 +1034,18 @@ Argument OVERRIDE-BUFFER use this buffer instead of 
reading from the output file
          (cmd rmsbolt-command)
          (force-disass (not (rmsbolt-l-supports-asm lang)))
          (force-asm (not (rmsbolt-l-supports-disass lang))))
-    (when (not cmd)
-      (setq-local rmsbolt-command
-                  (let ((new-cmd (rmsbolt-l-compile-cmd lang)))
-                    (pcase new-cmd
-                      ((pred functionp) (funcall new-cmd src-buffer))
-                      (_ new-cmd)))))
     (when (and force-disass force-asm)
       (error "No disassemble method found for this langauge, please double 
check spec"))
     (when force-disass
       (setq-local rmsbolt-disassemble t))
     (when force-asm
       (setq-local rmsbolt-disassemble nil))
+    (when (not cmd)
+      (setq-local rmsbolt-command
+                  (let ((new-cmd (rmsbolt-l-compile-cmd lang)))
+                    (pcase new-cmd
+                      ((pred functionp) (funcall new-cmd src-buffer))
+                      (_ new-cmd)))))
     src-buffer))
 
 (defun rmsbolt--demangle-command (existing-cmd lang src-buffer)



reply via email to

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