r7061: initial property settings

[clsql.git] / db-postgresql-socket / postgresql-socket-package.lisp

diff --git a/db-postgresql-socket/postgresql-socket-package.lisp b/db-postgresql-socket/postgresql-socket-package.lisp
index 04b08a9e0f4ec925231273b7368fcaf3353ccd7f..fa4062b1aa110cb45be42b208cc9f76e4907ac4b 100644 (file)
--- a/db-postgresql-socket/postgresql-socket-package.lisp
+++ b/db-postgresql-socket/postgresql-socket-package.lisp
@@ -2,12 +2,12 @@
 ;;;; *************************************************************************
 ;;;; FILE IDENTIFICATION
 ;;;;
-;;;; Name:          postgresql-socket-package.cl
+;;;; Name:          postgresql-socket-package.lisp
 ;;;; Purpose:       Package definition for PostgreSQL interface using sockets
 ;;;; Programmers:   Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: postgresql-socket-package.lisp,v 1.1 2002/09/30 10:19:23 kevin Exp $
+;;;; $Id$
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -16,13 +16,12 @@
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
-(in-package :cl-user)
+(in-package #:cl-user)
 
 #+lispworks (require "comm")
 
-(defpackage :postgresql-socket
-  (:use :common-lisp)
+(defpackage #:postgresql-socket
+  (:use #:cl)
   (:export #:pgsql-ftype
           #:pgsql-ftype#bytea
           #:pgsql-ftype#int2