blog, config: Make deploy dest a global knob

diff --git a/blog.lisp b/blog.lisp
index 9a218b0..f813a84 100644 (file)
--- a/blog.lisp
+++ b/blog.lisp
@@ -296,7 +296,7 @@
                             "--exclude 'drafts/' --exclude drafts.html"
                             "ssh -p 2200"
                             *lbs-site*
-                            "mogosanu.ro:/virtual/sites/thetarpit.org")
+                            *lbs-rsync-dest*)
                     :output *standard-output*))
 
 (defun tlbs-run-site (&key kill (port 8000))

diff --git a/config.lisp.example b/config.lisp.example
index 1daf509..699b71f 100644 (file)
--- a/config.lisp.example
+++ b/config.lisp.example
@@ -10,3 +10,6 @@
 
 ;; Path to the directory where the static site will be spat
 (defvar *lbs-site* (concatenate 'string *lbs-base* "_site/"))
+
+;; Site deployment path, where we will run tlbs-deploy-site
+(defvar *lbs-rsync-dest* "user@site.com:/ssh/path")