Skip Menu |
 

This queue is for tickets about the Tie-DBI CPAN distribution.

Report information
The Basics
Id: 15644
Status: resolved
Priority: 0/
Queue: Tie-DBI

People
Owner: TODDR [...] cpan.org
Requestors: ivor.williams [...] lch.com
Cc:
AdminCc:

Bug Information
Severity: Wishlist
Broken in: 1.01
Fixed in: (no value)

Attachments


MIME-Version: 1.0
X-Mailer: MIME-tools 5.418 (Entity 5.418)
Subject: SQLite provides a nice throwaway DBI database
Content-Type: multipart/mixed; boundary="----------=_1131532600-9978-0"
Content-Length: 0
Content-Type: text/plain
Content-Disposition: inline
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: iso-8859-1
Content-Length: 451
Download (untitled) / with headers
text/plain 451b
The tests for this module need write access to a database. In many environments, this is tricky if not impractical. The module probably predates SQLite, but can run with it as it stands, by: DRIVER=SQLite make test However, it would be nice if the SQLite driver is officially supported and encouraged - by making it the default driver. It would also be a good idea for the test to tidy up after itself if the driver is SQLite. A patch is attached.
Content-Type: text/plain; name="DBI.t.patch"
Content-Disposition: inline; filename="DBI.t.patch"
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: iso-8859-1
Content-Length: 907
Download DBI.t.patch
text/x-diff 907b
--- DBI.t +++ DBI_patched.t @@ -24,9 +24,9 @@ unless ($DRIVER) { local($^W)=0; # kill uninitialized variable warning - # I like mysql best, followed by Oracle and Sybase + # I like SQLite best, followed by mysql, Oracle and Sybase my ($count) = 0; - my (%DRIVERS) = map { ($_,$count++) } qw(Informix Pg Ingres mSQL Sybase Oracle mysql); # ExampleP doesn't work; + my (%DRIVERS) = map { ($_,$count++) } qw(SQLite Informix Pg Ingres mSQL Sybase Oracle mysql); # ExampleP doesn't work; ($DRIVER) = sort { $DRIVERS{$b}<=>$DRIVERS{$a} } DBI->available_drivers(1); } @@ -179,4 +179,6 @@ } test 30,$h{strawberries}->{quantity}=42; test 31,$h{strawberries}->{quantity}=42; # make sure update statement works when nothing changes -test 32,$h{strawberries}->{quantity}==42; +test 32,$h{strawberries}->{quantity}==42; + +rm DBNAME if $DRIVER eq 'SQLite' ;
MIME-Version: 1.0
X-Mailer: MIME-tools 5.427 (Entity 5.427)
Content-Disposition: inline
Content-Type: text/plain; charset="UTF-8"
Message-ID: <rt-3.8.HEAD-26544-1269897038-1174.15644-0-0 [...] rt.cpan.org>
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
Content-Length: 37
duplicate ticket to RT 3695. Closing.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.