From f9e045dd758811721a5197902f439e98c7fb664f Mon Sep 17 00:00:00 2001
From: mms <michal@sapka.me>
Date: Mon, 12 Feb 2024 22:58:30 +0100
Subject: feat: mms-prototype 80% there

---
 mms-prog.org | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

(limited to 'mms-prog.org')

diff --git a/mms-prog.org b/mms-prog.org
index 9b45df0..4a22336 100644
--- a/mms-prog.org
+++ b/mms-prog.org
@@ -70,3 +70,26 @@ I use =consult= for the as-I-type propositions.
     "f f" '(lambda () (interactive) (consult-find)) :wk "File"
     ))
 #+end_src
+
+* Prototyping
+
+#+begin_src emacs-lisp
+  (defun mms-prototype-ruby (name)
+    (interactive "sWhatcha workin on? ")
+    (setq today (shell-command-to-string "echo -n $(date +%Y-%m-%d)"))
+    (setq dir (concat mms-tmp-dir "/" name "-rb-" today "/"))
+
+    (make-directory dir)
+    (copy-file "~/.emacs.d/templates/spike-ruby.rb" (concat dir "run.rb"))
+    (find-file (concat dir "run.rb"))
+
+    (evil-window-vsplit)
+    (eshell)
+    (evil-window-left)
+
+    )
+
+#+end_src
+
+#+RESULTS:
+: mms-prototype-ruby
-- 
cgit v1.2.3