r1421 - in packages/libuser-simple-perl/trunk: . debian lib/User
lib/User/Simple
Gunnar Wolf
gwolf at costa.debian.org
Wed Oct 12 23:16:06 UTC 2005
Author: gwolf
Date: 2005-10-12 23:16:06 +0000 (Wed, 12 Oct 2005)
New Revision: 1421
Modified:
packages/libuser-simple-perl/trunk/Changes
packages/libuser-simple-perl/trunk/META.yml
packages/libuser-simple-perl/trunk/debian/changelog
packages/libuser-simple-perl/trunk/lib/User/Simple.pm
packages/libuser-simple-perl/trunk/lib/User/Simple/Admin.pm
Log:
New upstream release
Modified: packages/libuser-simple-perl/trunk/Changes
===================================================================
--- packages/libuser-simple-perl/trunk/Changes 2005-10-12 23:15:09 UTC (rev 1420)
+++ packages/libuser-simple-perl/trunk/Changes 2005-10-12 23:16:06 UTC (rev 1421)
@@ -1,5 +1,10 @@
Revision history for Perl extension User::Simple.
+1.35
+ - Gah... Using DBD::XBase in the tests lets many subtle
+ problems slip by... For example, 1.3 was released with a
+ broken User::Admin::new_user :-/
+
1.3 Thu Oct 6 13:21:56 CDT 2005
- By popular demand, User::Simple (not necessarily from within
::Admin) can modify the user data - Not only that, but also
Modified: packages/libuser-simple-perl/trunk/META.yml
===================================================================
--- packages/libuser-simple-perl/trunk/META.yml 2005-10-12 23:15:09 UTC (rev 1420)
+++ packages/libuser-simple-perl/trunk/META.yml 2005-10-12 23:16:06 UTC (rev 1421)
@@ -1,7 +1,7 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: User-Simple
-version: 1.3
+version: 1.35
version_from: lib/User/Simple.pm
installdirs: site
requires:
Modified: packages/libuser-simple-perl/trunk/debian/changelog
===================================================================
--- packages/libuser-simple-perl/trunk/debian/changelog 2005-10-12 23:15:09 UTC (rev 1420)
+++ packages/libuser-simple-perl/trunk/debian/changelog 2005-10-12 23:16:06 UTC (rev 1421)
@@ -1,3 +1,9 @@
+libuser-simple-perl (1.35-1) unstable; urgency=low
+
+ * New upstream release
+
+ -- Gunnar Wolf <gwolf at debian.org> Wed, 12 Oct 2005 18:41:00 -0500
+
libuser-simple-perl (1.30-1) unstable; urgency=low
* New upstream release
Modified: packages/libuser-simple-perl/trunk/lib/User/Simple/Admin.pm
===================================================================
--- packages/libuser-simple-perl/trunk/lib/User/Simple/Admin.pm 2005-10-12 23:15:09 UTC (rev 1420)
+++ packages/libuser-simple-perl/trunk/lib/User/Simple/Admin.pm 2005-10-12 23:16:06 UTC (rev 1421)
@@ -158,8 +158,8 @@
Modifies the requested attribute of the specified user, setting it to the new
value. Except for the login, they can all be set to null values - If the
-password is set to a null value, the account will be locked (that is, no
-password will be accepted). The internal attributes C<id>, C<session> and
+password is set to a null or empty value, the account will be locked (that is,
+no password will be accepted). The internal attributes C<id>, C<session> and
C<session_exp> cannot be directly modified (you have the C<id> as the hash
keys).
@@ -515,7 +515,7 @@
$id++;
$sth = $db->prepare("INSERT INTO $self->{tbl} (id, login)
- VALUES (?, ?, ?, ?)");
+ VALUES (?, ?)");
$sth->execute($id, $param{login});
# But just to be sure, lets retreive the ID from the login.
Modified: packages/libuser-simple-perl/trunk/lib/User/Simple.pm
===================================================================
--- packages/libuser-simple-perl/trunk/lib/User/Simple.pm 2005-10-12 23:15:09 UTC (rev 1420)
+++ packages/libuser-simple-perl/trunk/lib/User/Simple.pm 2005-10-12 23:16:06 UTC (rev 1421)
@@ -120,6 +120,11 @@
C<User::Simple> anyway, as changes are transparent. Some minor API changes do
happen in C<User::Simple::Admin>, though.
+Extended attributes are not checked in any way by User::Simple, they are just
+stored in the database just as they are received - Some DBDs might not even
+verify they are of the correct data type. As always, if you want to ensure
+consistence, use a real RDBMS.
+
Of course, beware: if the field does not exist, User::Simple will raise an
error and die just as if an unknown method had been called.
@@ -164,7 +169,7 @@
use UNIVERSAL qw(isa);
our $AUTOLOAD;
-our $VERSION = '1.3';
+our $VERSION = '1.35';
######################################################################
# Constructor/destructor
More information about the Pkg-perl-cvs-commits
mailing list