Add command for local testing

diff --git a/onerc.el b/onerc.el
index 5c054adbfcd7e2aa04269855adf215057449b3c7..ff752e3ee4c94c1ba8af4dff4219b7dba409d7c7 100644 (file)
--- a/onerc.el
+++ b/onerc.el
@@ -151,6 +151,14 @@ INFO is a plist holding contextual information."
         (format "<a href=\"%s\">%s</a>"
                 href (or (org-string-nw-p desc) href)))))
 
+(defun shtarkov.net-local ()
+  (interactive)
+  (unless (string-equal (buffer-name) "shtarkov.net.org")
+    (user-error "Must be visiting the proper file."))
+  (let ((default-directory (concat default-directory "public/")))
+    (async-shell-command "python3 -m http.server" "*local shtarkov.net*"))
+  (browse-url "http://localhost:8000/"))
+
 (defun shtarkov.net-build-and-deploy ()
   (interactive)
   (unless (string-equal (buffer-name) "shtarkov.net.org")