branch: externals/beardbolt
commit e0bc9fc409619f6c2caff36397ad88cfda2f5ce8
Author: Jay Kamat <[email protected]>
Commit: Jay Kamat <[email protected]>
Fix starters
---
rmsbolt.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/rmsbolt.el b/rmsbolt.el
index fd25f643e2..eaf1772cd8 100644
--- a/rmsbolt.el
+++ b/rmsbolt.el
@@ -373,8 +373,8 @@ int main() {
(display-buffer buffer))))))
;;;;; Parsing Options
-(defun rmsbolt--get-lang ()
- (cdr-safe (assoc major-mode rmsbolt-languages)))
+(defun rmsbolt--get-lang (&optional language)
+ (cdr-safe (assoc (or language major-mode) rmsbolt-languages)))
(defun rmsbolt--get-cmd ()
"Gets the rms command from the buffer, if available."
(save-excursion
@@ -414,8 +414,8 @@ int main() {
(defun rmsbolt-starter (lang-mode)
- "Code for "
- (let* ((lang-def (rmsbolt--get-lang))
+ "Code for fully setting up a language from LANG-MODE."
+ (let* ((lang-def (rmsbolt--get-lang lang-mode))
(file-name
(expand-file-name (rmsbolt-l-starter-file-name lang-def)
rmsbolt-temp-dir))
(exists (file-exists-p file-name)))
