X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=classic%2Fpackage.lisp;h=dd519278e261498126554b432bea988d4ed4520f;hb=10880a673c08e936462c8473a4508de2acce0826;hp=44eecaab01f300785be68adf48be2f6e1db14be5;hpb=39d3fefaebf35a19a211d1ab6552d7ff54faccd2;p=clsql.git diff --git a/classic/package.lisp b/classic/package.lisp index 44eecaa..dd51927 100644 --- a/classic/package.lisp +++ b/classic/package.lisp @@ -3,7 +3,7 @@ ;;;; FILE IDENTIFICATION ;;;; ;;;; Name: package.lisp -;;;; Purpose: Package definition for CLSQL (high-level) interface +;;;; Purpose: Package definition for CLSQL-CLASSIC high-level interface ;;;; Programmers: Kevin M. Rosenberg based on ;;;; Original code by Pierre R. Mai ;;;; Date Started: Feb 2002 @@ -21,8 +21,8 @@ (in-package #:cl-user) (eval-when (:compile-toplevel :load-toplevel :execute) - (defpackage #:clsql-sys - (:nicknames #:clsql) + (defpackage #:clsql-classic-sys + (:nicknames #:clsql-classic) (:use #:cl #:clsql-base-sys) (:import-from #:clsql-base @@ -128,7 +128,7 @@ ;; functional.lisp ;; These are no longer export since different functions are - ;; exported by the CLSQL-USQL package + ;; exported by the CLSQL package ;; #:insert-records ;; #:delete-records ;; #:update-records @@ -136,10 +136,10 @@ . #1# ) - (:documentation "This is the INTERNAL SQL-Interface package of CLSQL.")) + (:documentation "This is the INTERNAL SQL-Interface package of CLSQL-CLASSIC.")) ) ;eval-when -(defpackage #:clsql-user - (:use #:common-lisp #:clsql) - (:documentation "This is the user package for experimenting with CLSQL.")) +(defpackage #:clsql-classic-user + (:use #:common-lisp #:clsql-classic) + (:documentation "This is the user package for experimenting with CLSQL-CLASSIC."))