cl-openstack-client/update-deps.lisp

9 lines
338 B
Common Lisp

(load (make-pathname :directory (pathname-directory (user-homedir-pathname)) :name "quicklisp" :type "lisp"))
(quicklisp-quickstart:install)
(dolist (file '("../requirements.txt" "../test-requirements.txt"))
(with-open-file (s file)
(loop for line = (read-line s nil)
while line
do (ql:quickload line))))
(quit)