branch: externals/beardbolt
commit 547a47e58fbd23c432510bdd9b394cab7c6b6f6f
Author: Jay Kamat <jaygka...@gmail.com>
Commit: Jay Kamat <jaygka...@gmail.com>
Fix default commands
---
rmsbolt.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/rmsbolt.el b/rmsbolt.el
index 8f90023fad..67ebb96fae 100644
--- a/rmsbolt.el
+++ b/rmsbolt.el
@@ -35,6 +35,7 @@
"rmsbolt customization options"
:group 'applications)
+;;;;; Buffer Local Tweakables
(defcustom rmsbolt-dissasemble nil
"Whether we should dissasemble an output binary."
:type 'boolean
@@ -43,6 +44,7 @@
(defcustom rmsbolt-command nil
"The base command to run rmsbolt from."
:type 'string
+ ;; nil means use default command
:safe (lambda (v) (or (booleanp v) (stringp v)))
:group 'rmsbolt)
(defcustom rmsbolt-intel-x86 t
@@ -482,8 +484,8 @@ int main() {
(let* ((lang (rmsbolt--get-lang))
(src-buffer (current-buffer))
(cmd rmsbolt-command))
- (when cmd
- (setq-local rmsbolt-command cmd))
+ (when (not cmd)
+ (setq-local rmsbolt-command (rmsbolt-l-compile-cmd lang)))
(when (not (rmsbolt-l-supports-asm lang))
(setq-local rmsbolt-dissasemble t))
src-buffer))
