Rename the asdf-only archive into asdf-system.
authorFrancois-Rene Rideau <tunes@google.com>
Fri, 18 Jan 2013 09:36:51 +0000 (04:36 -0500)
committerFrancois-Rene Rideau <tunes@google.com>
Fri, 18 Jan 2013 09:36:51 +0000 (04:36 -0500)
bin/asdf-builder

index 90d779b..a10fd09 100755 (executable)
 (defun make-driver-tarball ()
   (make-tarball-under-build (driver-name) *asdf-dir* (driver-files)))
 
-(defun asdf-only-files ()
+(defun asdf-system-files ()
   (list* "asdf.asd" "build/asdf.lisp" "version.lisp-expr" "header.lisp"
          (system-source-files :asdf/generate)))
-(defun asdf-only-name ()
-  (format nil "asdf-only-~A" *version*))
-(defun make-asdf-only-tarball ()
+(defun asdf-system-name ()
+  (format nil "asdf-system-~A" *version*))
+(defun make-asdf-system-tarball ()
   (build-asdf)
-  (make-tarball-under-build (asdf-only-name) *asdf-dir* (asdf-only-files)))
+  (make-tarball-under-build (asdf-system-name) *asdf-dir* (asdf-system-files)))
 
 (defun make-git-tarball ()
   (build-asdf)
 
 (defun make-tarballs ()
   (make-driver-tarball)
-  (make-asdf-only-tarball)
+  (make-asdf-system-tarball)
   (make-git-tarball))
 
 (defparameter *versioned-files*