method execute ($c,$msg) {
my $dbh = $c->model;
- my $password = generate_random_string 10;
+ my $password = generate_random_string 16;
my $update = $dbh->do(q{
-UPDATE users SET password = MD5( ? )
-WHERE uid = ? AND password =''
+UPDATE users SET password = $1
+WHERE uid = $2 AND password IS NULL
},undef,$password,$c->uid);
if ($update > 0){
$c->reply("Password set to: $password (you can change it on webbie)");