[dw-free] Fix renamer to work with longer usernames.

[mark]

[commit: http://hg.dwscoalition.org/dw-free/rev/1bfc61088c2b]

Fix renamer to work with longer usernames.

Patch by denise.

Files modified:

• bin/renameuser.pl

--------------------------------------------------------------------------------
diff -r 7ceb6a364e3f -r 1bfc61088c2b bin/renameuser.pl
--- a/bin/renameuser.pl	Fri Apr 10 02:52:00 2009 +0000
+++ b/bin/renameuser.pl	Fri Apr 10 08:18:26 2009 +0000
@@ -23,7 +23,7 @@ my $error;
 
 my $from = shift @ARGV;
 my $to = shift @ARGV;
-usage() unless $from =~ /^\w{1,15}$/ && $to =~ /^\w{1,15}$/;
+usage() unless $from =~ /^\w{1,25}$/ && $to =~ /^\w{1,25}$/;
 
 my $dbh = LJ::get_db_writer();
 
--------------------------------------------------------------------------------