r22138 - in /trunk/libuser-simple-perl: Changes META.yml debian/changelog lib/User/Simple.pm t/User-Simple.t

gwolf at users.alioth.debian.org gwolf at users.alioth.debian.org
Tue Jun 24 12:26:42 UTC 2008


Author: gwolf
Date: Tue Jun 24 12:26:42 2008
New Revision: 22138

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=22138
Log:
New upstream version

Modified:
    trunk/libuser-simple-perl/Changes
    trunk/libuser-simple-perl/META.yml
    trunk/libuser-simple-perl/debian/changelog
    trunk/libuser-simple-perl/lib/User/Simple.pm
    trunk/libuser-simple-perl/t/User-Simple.t

Modified: trunk/libuser-simple-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuser-simple-perl/Changes?rev=22138&op=diff
==============================================================================
--- trunk/libuser-simple-perl/Changes (original)
+++ trunk/libuser-simple-perl/Changes Tue Jun 24 12:26:42 2008
@@ -1,9 +1,16 @@
 Revision history for Perl extension User::Simple.
+
+1.37 Mon Jun 23 10:41:00 CDT 2008
+     	- Fixed remaining file locking problem which caused the tests
+	  to fail in *BSD systems. Thanks to Slaven Rezic and CPANTS
+	  for helping me spot and fix the bug!
 
 1.36 Sun Jun 15 23:56:56 CDT 2008
         - Umh... since the very early revisions (0.9?), I was only
 	  explicitly skipping 14 tests if DBD::XBase is not
 	  installed. Updating it to 37. Grr.
+	- Changed the tests to run under SQLite3 instead of DBD::XBase
+	  - A bit more reliable, it seems
 
 1.35
         - Gah... Using DBD::XBase in the tests lets many subtle

Modified: trunk/libuser-simple-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuser-simple-perl/META.yml?rev=22138&op=diff
==============================================================================
--- trunk/libuser-simple-perl/META.yml (original)
+++ trunk/libuser-simple-perl/META.yml Tue Jun 24 12:26:42 2008
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                User-Simple
-version:             1.36
+version:             1.37
 abstract:            Simple user sessions management
 license:             ~
 author:              

Modified: trunk/libuser-simple-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuser-simple-perl/debian/changelog?rev=22138&op=diff
==============================================================================
--- trunk/libuser-simple-perl/debian/changelog (original)
+++ trunk/libuser-simple-perl/debian/changelog Tue Jun 24 12:26:42 2008
@@ -1,3 +1,9 @@
+libuser-simple-perl (1.37-1) unstable; urgency=low
+
+  * New upstream release
+
+ -- Gunnar Wolf <gwolf at debian.org>  Tue, 24 Jun 2008 07:24:04 -0500
+
 libuser-simple-perl (1.36-1) unstable; urgency=low
 
   * New upstream release.

Modified: trunk/libuser-simple-perl/lib/User/Simple.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuser-simple-perl/lib/User/Simple.pm?rev=22138&op=diff
==============================================================================
--- trunk/libuser-simple-perl/lib/User/Simple.pm (original)
+++ trunk/libuser-simple-perl/lib/User/Simple.pm Tue Jun 24 12:26:42 2008
@@ -169,7 +169,7 @@
 use UNIVERSAL qw(isa);
 
 our $AUTOLOAD;
-our $VERSION = '1.36';
+our $VERSION = '1.37';
 
 ######################################################################
 # Constructor/destructor

Modified: trunk/libuser-simple-perl/t/User-Simple.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuser-simple-perl/t/User-Simple.t?rev=22138&op=diff
==============================================================================
--- trunk/libuser-simple-perl/t/User-Simple.t (original)
+++ trunk/libuser-simple-perl/t/User-Simple.t Tue Jun 24 12:26:42 2008
@@ -3,8 +3,8 @@
 
 use strict;
 use DBI;
-use File::Temp;
-my ($db, $tmp_fh);
+use File::Temp qw(:mktemp);
+my ($db, $tmp_file);
 
 #########################
 
@@ -18,8 +18,8 @@
 # Insert your test code below, the Test::More module is use()ed here so read
 # its man page ( perldoc Test::More ) for help writing this test script.
 
-$tmp_fh = File::Temp->new(TEMPLATE => 'User-Simple-build-XXXXXX');
-eval { $db = DBI->connect('DBI:SQLite:dbname=' .$tmp_fh->filename) };
+$tmp_file = mktemp('User-Simple-build-XXXXXX');
+eval { $db = DBI->connect('DBI:SQLite:dbname=' .$tmp_file) };
 
 SKIP: {
     my ($ua, $adm_id, $usr_id, $usr, $session, %users);
@@ -157,3 +157,4 @@
     is($usr->adm_level, 0, 'Reported adm_level matches');
 
 }
+unlink($tmp_file)




More information about the Pkg-perl-cvs-commits mailing list