From aventimiglia at common-lisp.net  Fri Jan 23 15:39:02 2004
From: aventimiglia at common-lisp.net (Anthony Ventimiglia)
Date: Fri, 23 Jan 2004 10:39:02 -0500
Subject: [bayescl-cvs] CVS update: bayescl/bayescl.asd 
Message-ID: <E1Ak3Og-0005Ph-00@common-lisp.net>

Update of /project/bayescl/cvsroot/bayescl
In directory common-lisp.net:/tmp/cvs-serv19196

Modified Files:
	bayescl.asd 
Log Message:
Version change

Date: Fri Jan 23 10:39:02 2004
Author: aventimiglia

Index: bayescl/bayescl.asd
diff -u bayescl/bayescl.asd:1.1.1.1 bayescl/bayescl.asd:1.2
--- bayescl/bayescl.asd:1.1.1.1	Tue Nov 25 10:55:34 2003
+++ bayescl/bayescl.asd	Fri Jan 23 10:39:02 2004
@@ -1,4 +1,4 @@
-;; $Id: bayescl.asd,v 1.1.1.1 2003/11/25 15:55:34 aventimiglia Exp $
+;; $Id: bayescl.asd,v 1.2 2004/01/23 15:39:02 aventimiglia Exp $
 ;;
 ;; bayescl - A Common Lisp Bayesian Filtering Library
 ;; (c) 2003 Anthony J Ventimiglia.
@@ -25,8 +25,10 @@
   :name "net.common-lisp.bayescl"
   :author "Anthony Ventimiglia <aventimiglia at common-lisp.net>"
   :maintainer "Anthony Ventimiglia <aventimiglia at common-lisp.net>"
-  :version #.(or "0.1.0"
-		 (let* ((trimmed (string-trim "$ Date:" "$Date: 2003/11/25 15:55:34 $"))
+  :version #.(or nil
+		 (let* ((trimmed
+			 (string-trim
+			  "$ Date:" "$Date: 2004/01/23 15:39:02 $"))
 			(date (subseq trimmed 0 (search " " trimmed))))
 		   (concatenate 'string (subseq date 0 4)
 				(subseq date 5 7) (subseq date 8 10) "cvs")))