Skip to content

Commit ca045e2

Browse files
committed
fix: deploy script does not call sbcl
Please call sbcl manually, and from within the REPL: (ql:quickload :be-it) (be-it:save)
1 parent 78765a8 commit ca045e2

File tree

2 files changed

+4
-5
lines changed

2 files changed

+4
-5
lines changed

deploy.sh

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,4 @@
11
#!/bin/bash
22

3-
sudo sbcl --script ./src/main.lisp && \
4-
wkhtmltopdf ./src/my-cv.html ./src/resources/cv.david-rueda.pdf && \
5-
sudo cp -r ./src/resources /mnt/linode/my/var/www/localhost/htdocs/
3+
wkhtmltopdf ./src/my-cv.html ./src/resources/cv.david-rueda.pdf && \
4+
cp -r ./src/resources /home/davd/linode/var/www/localhost/htdocs/

src/main.lisp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -188,9 +188,9 @@
188188
:initial-value (:p))))))
189189

190190
(defun save ()
191-
(let ((linode-html-file-path "/mnt/linode/my/var/www/localhost/htdocs/index.html")
191+
(let ((linode-html-file-path "/home/davd/linode/var/www/localhost/htdocs/index.html")
192192
(project-html-file-path "/home/davd/clisp/be-it/src/my-cv.html"))
193-
(with-open-file (cv-file project-html-file-path :direction :output
193+
(with-open-file (cv-file linode-html-file-path :direction :output
194194
:if-exists :supersede)
195195
(let ((spinneret:*html* cv-file))
196196
(index)))))

0 commit comments

Comments
 (0)