shorten

lisp/install+7zip.lisp

@@ -4,9 +4,6 @@
   (warn "7zip is only required on windows")
   (ros:quit 0))
 
-(ros:quicklisp :environment nil)
-(ql:quickload :zip :silent t)
-
 (defun 7za ()
   (let* ((uri (7za-uri))
          (pos (position #\/ uri :from-end t))

lisp/install-abcl-bin.lisp

@@ -1,6 +1,4 @@
-
 (in-package :ros.install)
-(ql:quickload '(:plump :simple-date-time :split-sequence :cl-ppcre) :silent t)
 
 (defun abcl-bin-get-version ()
   (let ((file (merge-pathnames "tmp/abcl-bin.html" (homedir))))

lisp/install-ccl-bin.lisp

@@ -1,8 +1,4 @@
 (in-package :ros.install)
-(ros:quicklisp :environment nil)
-
-#+win32
-(ql:quickload :zip :silent t)
 
 (defun ccl-bin-get-version ()
   (let ((file (merge-pathnames "tmp/ccl-bin.html" (homedir))))

lisp/install-ecl.lisp

@@ -1,5 +1,4 @@
 (in-package :ros.install)
-(ql:quickload '(:plump :simple-date-time :split-sequence) :silent t)
 
 (defvar *ecl-options*
   '())

lisp/util-install-quicklisp.lisp

@@ -10,7 +10,7 @@
 (unless (find-package :uiop)
   #+quicklisp(ql:quickload :uiop :silent t))
 
-(ql:quickload '(:simple-date-time :split-sequence :plump) :silent t)
+(ql:quickload '(:simple-date-time :split-sequence :plump :cl-ppcre #+win32 :zip) :silent t)
 
 (in-package :ros.install)