clsql/db-mysql mysql-usql.lisp,1.1,1.2

"Kevin M. Rosenberg" <[email protected]> Thu, 26 Jun 2003 09:27:09 -0600
Newsgroups gmane.lisp.clsql.cvs
Message-ID <[email protected]>
Update of /pubcvs/clsql/db-mysql
In directory boa.b9.com:/tmp/cvs-serv11890/db-mysql

Modified Files:
	mysql-usql.lisp 
Log Message:


Index: mysql-usql.lisp
===================================================================
RCS file: /pubcvs/clsql/db-mysql/mysql-usql.lisp,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** mysql-usql.lisp	30 Sep 2002 10:19:23 -0000	1.1
--- mysql-usql.lisp	26 Jun 2003 15:27:07 -0000	1.2
***************
*** 18,23 ****
  ;;;; *************************************************************************
  
! (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
! (in-package :clsql-mysql)
  
  ;; Table and attribute introspection
--- 18,22 ----
  ;;;; *************************************************************************
  
! (in-package #:clsql-mysql)
  
  ;; Table and attribute introspection
***************
*** 63,67 ****
      (database-execute-command 
       (concatenate 'string "INSERT INTO " table-name
! 		  " VALUES (0)")
       database)))
  
--- 62,66 ----
      (database-execute-command 
       (concatenate 'string "INSERT INTO " table-name
! 		  " VALUES (-1)")
       database)))