perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Terrence Brannon <metap...@urth.org>
Subject DBIx::Recordset - MySQL DeleteWithLinks() test fails
Date Wed, 03 Dec 2003 13:47:13 GMT
So far, postgres and sqlite pass the test suite. mysql is failing with 
this error:

Clear (Delete all) disabled for table : (! && !(7 & wmCLEAR)) at 
blib/lib/DBIx/\
Database.pm line 57
        
DBIx::Database::Base::savecroak('DBIx::Recordset=HASH(0x86248dc)','Clea\
r (Delete all) disabled for table : (! && !(7 & wmCLEAR))') called at 
blib/lib/\
DBIx/Recordset.pm line 2733
        
DBIx::Recordset::DeleteWithLinks('DBIx::Recordset=HASH(0x86248dc)','HAS\
H(0x8618170)','HASH(0x850f0f0)') called at blib/lib/DBIx/Recordset.pm 
line 2778
        
DBIx::Recordset::DeleteWithLinks('DBIx::Recordset=HASH(0x84da3f8)','HAS\
H(0x8624744)') called at test.pl line 1957
        
main::DoTest('mysql','dbi:mysql:princepawn','princepawn','money1') call\
ed at test.pl line 4031

test.pl:1957 is:
        $set1 -> DeleteWithLinks ({ 'id' => 1
                                                })  or die "not ok 
($DBI::errst\
r)" ;

Recordset.pm:2778 is:
                      $$updset -> DeleteWithLinks ({$lf => $mv}, $seen) ;

Recordset.pm: 2732-2833 is:
  my $clear_disabled_diag =
      "(!$expr && !($self->{'*WriteMode'} & wmCLEAR))";
    $self -> savecroak ("Clear (Delete all) disabled for table 
$self->{'*Table'\
}: $clear_disabled_diag") if (!$expr && !($self->{'*WriteMode'} & 
wmCLEAR)) ;

I added the diagnostic string to the croak message so it would be clear 
why the
exception is being thrown. It is being thrown because the WriteMode must 
be 8 for it
to bitwise-and to a true value with wmClear.

So the question is: how did this test pass with the other 2 drivers and 
fail with this one?




---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message