#.(progn (ql:quickload :legit)
nil)
(defun clone-github-repo (user repo)
(let ((result-dir (merge-pathnames (make-pathname :directory (list :relative
"quicklisp" "local-projects"
repo)
:defaults #p"/")
(user-homedir-pathname))))
(legit:git-clone (format nil "https://github.com/~a/~a.git" user repo)
:directory result-dir)))
(clone-github-repo "fukamachi" "lack")
(clone-github-repo "fiddlerwoaroof" "data-lens")
(asdf:load-asd "/root/todo-backend.asd")
(ql:quickload (asdf:system-depends-on (asdf:find-system :todo-backend)))
|