[Cpan-forum-commit] rev 78 - trunk/lib/CPAN

[svn at pti.co.il]

Author: gabor
Date: 2005-02-04 10:38:06 +0200 (Fri, 04 Feb 2005)
New Revision: 78

Modified:
   trunk/lib/CPAN/Forum.pm
Log:
enable shorter usernames and show 50 messages on every page temporarily

Modified: trunk/lib/CPAN/Forum.pm
===================================================================
--- trunk/lib/CPAN/Forum.pm	2005-02-04 08:37:07 UTC (rev 77)
+++ trunk/lib/CPAN/Forum.pm	2005-02-04 08:38:06 UTC (rev 78)
@@ -16,7 +16,7 @@
 
 use CPAN::Forum::INC;
 
-my $limit       = 20;
+my $limit       = 50;
 my $limit_rss   = 10;
 my $cookiename  = "cpanforum";
 my $SUBJECT = qr{[\w .:~!@#\$%^&*\()+?><,'";=-]+};
@@ -941,7 +941,7 @@
 	}
 	
 	# TODO arbitrary nickname constraint, allow other nicknames ?
-	if ($q->param('nickname') !~ /^[a-z0-9]{4,10}$/) {
+	if ($q->param('nickname') !~ /^[a-z0-9]{1,10}$/) {
 		return $self->register({"bad_nickname" => 1});
 	}