From: Kevin M. Rosenberg Date: Fri, 5 Jul 2002 17:06:45 +0000 (+0000) Subject: r2186: *** empty log message *** X-Git-Tag: v3.8.6~1027 X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=f7f74c4b2a0097ae3cff1af4d0f9bc46860fadfb r2186: *** empty log message *** --- diff --git a/ChangeLog b/ChangeLog index 3b46c70..dde0c9d 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,6 @@ +05 Jul 2002 Kevin Rosenberg (kevin@rosenberg.net) + * Change case of logical host + 14 May 2002 Kevin Rosenberg (kevin@rosenberg.net) * clsql-base.system: Added base package that can be used without high-level SQL commands. Used for adding support for UncommonSQL. diff --git a/clsql-aodbc.system b/clsql-aodbc.system index 4cb2fe6..afce921 100644 --- a/clsql-aodbc.system +++ b/clsql-aodbc.system @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql-aodbc.system,v 1.6 2002/05/27 17:19:29 kevin Exp $ +;;;; $Id: clsql-aodbc.system,v 1.7 2002/07/05 17:05:45 kevin Exp $ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -20,9 +20,9 @@ (in-package :make) (defsystem :clsql-aodbc - :source-pathname "CL-LIBRARY:clsql;interfaces;aodbc;" + :source-pathname "cl-library:clsql;interfaces;aodbc;" :source-extension "cl" - :binary-pathname "CL-LIBRARY:clsql;interfaces;aodbc;bin;" + :binary-pathname "cl-library:clsql;interfaces;aodbc;bin;" :components ((:file "aodbc-package") (:file "aodbc-sql" :depends-on ("aodbc-package"))) :depends-on (:clsql-base)) diff --git a/clsql-base.system b/clsql-base.system index b22e34f..07675b7 100644 --- a/clsql-base.system +++ b/clsql-base.system @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql-base.system,v 1.6 2002/05/15 17:19:42 kevin Exp $ +;;;; $Id: clsql-base.system,v 1.7 2002/07/05 17:05:45 kevin Exp $ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -28,9 +28,9 @@ ;;; System definitions (mk:defsystem :clsql-base - :source-pathname "CL-LIBRARY:clsql;base;" + :source-pathname "cl-library:clsql;base;" :source-extension "cl" - :binary-pathname "CL-LIBRARY:clsql;base;bin;" + :binary-pathname "cl-library:clsql;base;bin;" :components ((:file "cmucl-compat") (:file "package") (:file "utils" :depends-on ("package")) diff --git a/clsql-mysql.system b/clsql-mysql.system index dacf165..a3e7d8a 100644 --- a/clsql-mysql.system +++ b/clsql-mysql.system @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql-mysql.system,v 1.13 2002/05/14 16:25:29 kevin Exp $ +;;;; $Id: clsql-mysql.system,v 1.14 2002/07/05 17:05:45 kevin Exp $ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -23,9 +23,9 @@ ;;; System definition (mk:defsystem :clsql-mysql - :source-pathname "CL-LIBRARY:clsql;interfaces;mysql;" + :source-pathname "cl-library:clsql;interfaces;mysql;" :source-extension "cl" - :binary-pathname "CL-LIBRARY:clsql;interfaces;mysql;bin;" + :binary-pathname "cl-library:clsql;interfaces;mysql;bin;" :components ((:file "mysql-package") (:file "mysql-loader" :depends-on ("mysql-package")) (:file "mysql-api" :depends-on ("mysql-loader")) diff --git a/clsql-postgresql-socket.system b/clsql-postgresql-socket.system index aa35889..c95b31c 100644 --- a/clsql-postgresql-socket.system +++ b/clsql-postgresql-socket.system @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql-postgresql-socket.system,v 1.7 2002/05/13 22:05:20 kevin Exp $ +;;;; $Id: clsql-postgresql-socket.system,v 1.8 2002/07/05 17:05:45 kevin Exp $ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -22,9 +22,9 @@ ;;; System definition (defsystem :clsql-postgresql-socket - :source-pathname "CL-LIBRARY:clsql;interfaces;postgresql-socket;" + :source-pathname "cl-library:clsql;interfaces;postgresql-socket;" :source-extension "cl" - :binary-pathname "CL-LIBRARY:clsql;interfaces;postgresql-socket;bin;" + :binary-pathname "cl-library:clsql;interfaces;postgresql-socket;bin;" :components ((:file "postgresql-socket-package") (:file "postgresql-socket-api" :depends-on ("postgresql-socket-package")) diff --git a/clsql-postgresql.system b/clsql-postgresql.system index 13c840d..59465e7 100644 --- a/clsql-postgresql.system +++ b/clsql-postgresql.system @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql-postgresql.system,v 1.7 2002/05/13 22:05:20 kevin Exp $ +;;;; $Id: clsql-postgresql.system,v 1.8 2002/07/05 17:05:45 kevin Exp $ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -20,9 +20,9 @@ (in-package :make) (defsystem :clsql-postgresql - :source-pathname "CL-LIBRARY:clsql;interfaces;postgresql;" + :source-pathname "cl-library:clsql;interfaces;postgresql;" :source-extension "cl" - :binary-pathname "CL-LIBRARY:clsql;interfaces;postgresql;bin;" + :binary-pathname "cl-library:clsql;interfaces;postgresql;bin;" :source-extension "cl" :components ((:file "postgresql-package") (:file "postgresql-loader" :depends-on ("postgresql-package")) diff --git a/clsql-uffi.system b/clsql-uffi.system index 5973b67..0f2c472 100644 --- a/clsql-uffi.system +++ b/clsql-uffi.system @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql-uffi.system,v 1.3 2002/05/13 13:18:36 marc.battyani Exp $ +;;;; $Id: clsql-uffi.system,v 1.4 2002/07/05 17:05:45 kevin Exp $ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -23,9 +23,9 @@ ;;; System definition (mk:defsystem :clsql-uffi - :source-pathname "CL-LIBRARY:clsql;interfaces;clsql-uffi;" + :source-pathname "cl-library:clsql;interfaces;clsql-uffi;" :source-extension "cl" - :binary-pathname "CL-LIBRARY:clsql;interfaces;clsql-uffi;bin;" + :binary-pathname "cl-library:clsql;interfaces;clsql-uffi;bin;" :components ((:file "clsql-uffi-package") (:file "clsql-uffi-loader" :depends-on ("clsql-uffi-package")) (:file "clsql-uffi" :depends-on ("clsql-uffi-loader"))) diff --git a/clsql.system b/clsql.system index 9efc2ad..f482515 100644 --- a/clsql.system +++ b/clsql.system @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql.system,v 1.15 2002/05/27 17:19:30 kevin Exp $ +;;;; $Id: clsql.system,v 1.16 2002/07/05 17:05:45 kevin Exp $ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -28,9 +28,9 @@ ;;; System definitions (mk:defsystem :clsql - :source-pathname "CL-LIBRARY:clsql;sql;" + :source-pathname "cl-library:clsql;sql;" :source-extension "cl" - :binary-pathname "CL-LIBRARY:clsql;sql;bin;" + :binary-pathname "cl-library:clsql;sql;bin;" :components ((:file "package") (:file "pool" :depends-on ("package")) (:file "loop-extension") diff --git a/debian/changelog b/debian/changelog index 37c7e1e..4b40c56 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-sql (0.7.2-1) unstable; urgency=low + + * New upstream version. + + -- Kevin M. Rosenberg Fri, 5 Jul 2002 11:06:21 -0600 + cl-sql (0.7.1-2) unstable; urgency=low * Additions to the copyright file diff --git a/set-cl-library.cl b/set-cl-library.cl index 1d18e5e..689113c 100644 --- a/set-cl-library.cl +++ b/set-cl-library.cl @@ -18,7 +18,7 @@ ;; This mirrors the expectation of Common Lisp Controller's pathnames (handler-case - (logical-pathname-translations "CL-LIBRARY") + (logical-pathname-translations "cl-library") (error () (let* ((dir (pathname-directory *load-truename*)) (parent-dir (subseq dir 0 (1- (length dir))))) @@ -30,14 +30,14 @@ :device (pathname-device *load-truename*) :directory parent-dir)))) (:no-error (translation) - ;; Make sure that CL-LIBRARY points to this installation + ;; Make sure that cl-library points to this installation (let* ((dir (pathname-directory *load-truename*)) (base-dir (car (last dir))) (logical-dir (translate-logical-pathname (concatenate 'string - "CL-LIBRARY:" base-dir ";")))) + "cl-library:" base-dir ";")))) (unless (equalp dir (pathname-directory logical-dir)) (let ((*print-circle* nil)) - (error "CL-LIBRARY:~A; directory ~S does not equal *load-truename*'s directory ~S" + (error "cl-library:~A; directory ~S does not equal *load-truename*'s directory ~S" base-dir (cdr dir) (cdr (pathname-directory logical-dir))))))))