Commit 135437fb authored by Gary King's avatar Gary King
Browse files

now allows license / licence initargs and system-license / system-licence accessors

parent 29d10949
;;; This is asdf: Another System Definition Facility. $Revision: 1.98 $ ;;; This is asdf: Another System Definition Facility. $Revision: 1.99 $
;;; ;;;
;;; Feedback, bug reports, and patches are all welcome: please mail to ;;; Feedback, bug reports, and patches are all welcome: please mail to
;;; <cclan-list@lists.sf.net>. But note first that the canonical ;;; <cclan-list@lists.sf.net>. But note first that the canonical
...@@ -78,6 +78,7 @@ ...@@ -78,6 +78,7 @@
#:system-author #:system-author
#:system-maintainer #:system-maintainer
#:system-license #:system-license
#:system-licence
#:operation-on-warnings #:operation-on-warnings
#:operation-on-failure #:operation-on-failure
...@@ -109,7 +110,7 @@ ...@@ -109,7 +110,7 @@
(in-package #:asdf) (in-package #:asdf)
(defvar *asdf-revision* (let* ((v "$Revision: 1.98 $") (defvar *asdf-revision* (let* ((v "$Revision: 1.99 $")
(colon (or (position #\: v) -1)) (colon (or (position #\: v) -1))
(dot (position #\. v))) (dot (position #\. v)))
(and v colon dot (and v colon dot
...@@ -285,7 +286,8 @@ and NIL NAME and TYPE components" ...@@ -285,7 +286,8 @@ and NIL NAME and TYPE components"
:accessor system-long-description :initarg :long-description) :accessor system-long-description :initarg :long-description)
(author :accessor system-author :initarg :author) (author :accessor system-author :initarg :author)
(maintainer :accessor system-maintainer :initarg :maintainer) (maintainer :accessor system-maintainer :initarg :maintainer)
(licence :accessor system-licence :initarg :licence))) (licence :accessor system-licence :initarg :licence
:accessor system-license :initarg :license)))
;;; version-satisfies ;;; version-satisfies
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment