[interchange-cvs] interchange - racke modified 2 files
interchange-core@icdevgroup.org
interchange-core@icdevgroup.org
Tue Aug 6 19:03:00 2002
User: racke
Date: 2002-08-06 23:02:17 GMT
Modified: . Tag: STABLE_4_8-branch WHATSNEW
Modified: lib/Vend/Table Tag: STABLE_4_8-branch DBI.pm
Log:
Set SQL database attribute _Auto_number in Vend::Table::DBI::create method
as we already did in Vend::Table::DBI::open_table.
Revision Changes Path
No revision
No revision
2.6.2.78 +3 -0 interchange/WHATSNEW
rev 2.6.2.78, prev_rev 2.6.2.77
Index: WHATSNEW
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/WHATSNEW,v
retrieving revision 2.6.2.77
retrieving revision 2.6.2.78
diff -u -r2.6.2.77 -r2.6.2.78
--- WHATSNEW 6 Aug 2002 22:47:33 -0000 2.6.2.77
+++ WHATSNEW 6 Aug 2002 23:02:16 -0000 2.6.2.78
@@ -55,6 +55,9 @@
library. Thanks to Joachim Leidinger for reporting and pursuing
this problem and Alexander Leidinger for debugging.
=20
+* Set SQL database attribute _Auto_number in Vend::Table::DBI::create meth=
od
+ as we already did in Vend::Table::DBI::open_table.
+
Usertags
--------
=20
No revision
No revision
2.0.2.9 +5 -2 interchange/lib/Vend/Table/DBI.pm
rev 2.0.2.9, prev_rev 2.0.2.8
Index: DBI.pm
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/lib/Vend/Table/DBI.pm,v
retrieving revision 2.0.2.8
retrieving revision 2.0.2.9
diff -u -r2.0.2.8 -r2.0.2.9
--- DBI.pm 23 Jul 2002 13:03:04 -0000 2.0.2.8
+++ DBI.pm 6 Aug 2002 23:02:17 -0000 2.0.2.9
@@ -1,6 +1,6 @@
# Vend::Table::DBI - Access a table stored in an DBI/DBD database
#
-# $Id: DBI.pm,v 2.0.2.8 2002/07/23 13:03:04 mheins Exp $
+# $Id: DBI.pm,v 2.0.2.9 2002/08/06 23:02:17 racke Exp $
#
# Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
#
@@ -20,7 +20,7 @@
# MA 02111-1307 USA.
=20
package Vend::Table::DBI;
-$VERSION =3D substr(q$Revision: 2.0.2.8 $, 10);
+$VERSION =3D substr(q$Revision: 2.0.2.9 $, 10);
=20
use strict;
=20
@@ -359,6 +359,9 @@
if(! defined $config->{EXTENDED}) {
## side-effects here -- sets $config->{NUMERIC},
## $config->{_Numeric_ary}, reads GUESS_NUMERIC
+
+ $config->{_Auto_number} =3D $config->{AUTO_SEQUENCE} || $config->{AUTO_N=
UMBER};
+=09=09
if(! $config->{NAME}) {
$config->{NAME} =3D list_fields($db, $tablename, $config);
}