r47198 - in /trunk/libdbix-class-perl: ./ debian/ inc/ lib/DBIx/ lib/DBIx/Class/Storage/DBI/ lib/DBIx/Class/Storage/DBI/ADO/ maint/ t/

[jawnsy-guest at users.alioth.debian.org]

Author: jawnsy-guest
Date: Sun Nov 15 02:37:27 2009
New Revision: 47198

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=47198
Log:
integrate new version

Added:
    trunk/libdbix-class-perl/MANIFEST
      - copied unchanged from r47197, branches/upstream/libdbix-class-perl/current/MANIFEST
    trunk/libdbix-class-perl/META.yml
      - copied unchanged from r47197, branches/upstream/libdbix-class-perl/current/META.yml
    trunk/libdbix-class-perl/README
      - copied unchanged from r47197, branches/upstream/libdbix-class-perl/current/README
    trunk/libdbix-class-perl/inc/
      - copied from r47197, branches/upstream/libdbix-class-perl/current/inc/
    trunk/libdbix-class-perl/lib/DBIx/Class/Storage/DBI/ADO/
      - copied from r47197, branches/upstream/libdbix-class-perl/current/lib/DBIx/Class/Storage/DBI/ADO/
    trunk/libdbix-class-perl/lib/DBIx/Class/Storage/DBI/ADO.pm
      - copied unchanged from r47197, branches/upstream/libdbix-class-perl/current/lib/DBIx/Class/Storage/DBI/ADO.pm
    trunk/libdbix-class-perl/t/747mssql_ado.t
      - copied unchanged from r47197, branches/upstream/libdbix-class-perl/current/t/747mssql_ado.t
Removed:
    trunk/libdbix-class-perl/.gitignore
    trunk/libdbix-class-perl/Features_09
    trunk/libdbix-class-perl/MANIFEST.SKIP
    trunk/libdbix-class-perl/TODO
    trunk/libdbix-class-perl/maint/
Modified:
    trunk/libdbix-class-perl/Changes
    trunk/libdbix-class-perl/Makefile.PL
    trunk/libdbix-class-perl/debian/changelog
    trunk/libdbix-class-perl/lib/DBIx/Class.pm
    trunk/libdbix-class-perl/lib/DBIx/Class/Storage/DBI/MSSQL.pm
    trunk/libdbix-class-perl/t/73oracle.t

Modified: trunk/libdbix-class-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbix-class-perl/Changes?rev=47198&op=diff
==============================================================================
--- trunk/libdbix-class-perl/Changes (original)
+++ trunk/libdbix-class-perl/Changes Sun Nov 15 02:37:27 2009
@@ -1,4 +1,8 @@
 Revision history for DBIx::Class
+
+0.08114 2009-11-14 17:45:00 (UTC)
+        - Preliminary support for MSSQL via DBD::ADO
+        - Fix botched 0.08113 release (invalid tarball)
 
 0.08113 2009-11-13 23:13:00 (UTC)
         - Fix populate with has_many bug

Modified: trunk/libdbix-class-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbix-class-perl/Makefile.PL?rev=47198&op=diff
==============================================================================
--- trunk/libdbix-class-perl/Makefile.PL (original)
+++ trunk/libdbix-class-perl/Makefile.PL Sun Nov 15 02:37:27 2009
@@ -110,7 +110,7 @@
     ) : ()
   ,
 
-  $ENV{DBICTEST_ORACLE_DSN}
+  $ENV{DBICTEST_ORA_DSN}
     ? (
       'DateTime::Format::Oracle' => '0',
     ) : ()

Modified: trunk/libdbix-class-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbix-class-perl/debian/changelog?rev=47198&op=diff
==============================================================================
--- trunk/libdbix-class-perl/debian/changelog (original)
+++ trunk/libdbix-class-perl/debian/changelog Sun Nov 15 02:37:27 2009
@@ -1,7 +1,4 @@
-libdbix-class-perl (0.08113-1) UNRELEASED; urgency=low
-
-  Note: DO NOT USE. this version is BROKEN. a new upstream version is
-  forthcoming.
+libdbix-class-perl (0.08114-1) UNRELEASED; urgency=low
 
   [ Jonathan Yu ]
   * New upstream release
@@ -10,7 +7,7 @@
   * debian/control: Changed: (build-)depend on perl instead of perl-
     modules.
 
- -- Jonathan Yu <jawnsy at cpan.org>  Sat, 14 Nov 2009 09:58:10 -0500
+ -- Jonathan Yu <jawnsy at cpan.org>  Sat, 14 Nov 2009 18:06:07 -0500
 
 libdbix-class-perl (0.08112-1) unstable; urgency=low
 

Modified: trunk/libdbix-class-perl/lib/DBIx/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbix-class-perl/lib/DBIx/Class.pm?rev=47198&op=diff
==============================================================================
--- trunk/libdbix-class-perl/lib/DBIx/Class.pm (original)
+++ trunk/libdbix-class-perl/lib/DBIx/Class.pm Sun Nov 15 02:37:27 2009
@@ -24,7 +24,7 @@
 # Always remember to do all digits for the version even if they're 0
 # i.e. first release of 0.XX *must* be 0.XX000. This avoids fBSD ports
 # brain damage and presumably various other packaging systems too
-$VERSION = '0.08113';
+$VERSION = '0.08114';
 
 $VERSION = eval $VERSION; # numify for warning-free dev releases
 

Modified: trunk/libdbix-class-perl/lib/DBIx/Class/Storage/DBI/MSSQL.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbix-class-perl/lib/DBIx/Class/Storage/DBI/MSSQL.pm?rev=47198&op=diff
==============================================================================
--- trunk/libdbix-class-perl/lib/DBIx/Class/Storage/DBI/MSSQL.pm (original)
+++ trunk/libdbix-class-perl/lib/DBIx/Class/Storage/DBI/MSSQL.pm Sun Nov 15 02:37:27 2009
@@ -160,7 +160,7 @@
 
     # this should bring back the result of SELECT SCOPE_IDENTITY() we tacked
     # on in _prep_for_execute above
-    my ($identity) = $sth->fetchrow_array;
+    my ($identity) = eval { $sth->fetchrow_array };
 
     # SCOPE_IDENTITY failed, but we can do something else
     if ( (! $identity) && $self->_identity_method) {

Modified: trunk/libdbix-class-perl/t/73oracle.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbix-class-perl/t/73oracle.t?rev=47198&op=diff
==============================================================================
--- trunk/libdbix-class-perl/t/73oracle.t (original)
+++ trunk/libdbix-class-perl/t/73oracle.t Sun Nov 15 02:37:27 2009
@@ -203,7 +203,10 @@
 my $st = $schema->resultset('SequenceTest')->create({ name => 'foo', pkid1 => 55 });
 is($st->pkid1, 55, "Oracle Auto-PK without trigger: First primary key set manually");
 
-{
+SKIP: {
+        skip 'buggy BLOB support in DBD::Oracle 1.23', 8
+          if $DBD::Oracle::VERSION == 1.23;
+
 	my %binstr = ( 'small' => join('', map { chr($_) } ( 1 .. 127 )) );
 	$binstr{'large'} = $binstr{'small'} x 1024;