X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=Usermgm.pm;h=16ef53844296fa1ddcca53938b70a832083a6500;hb=503db6bf51120be14f2b16643462dfd2a39a9bc0;hp=4dde13ad5c0356862e3e8a4bf3c770b0347aa1aa;hpb=0037f3ea50d01fe17985b479bc9f5d7a3ae03381;p=NDIRC.git diff --git a/Usermgm.pm b/Usermgm.pm index 4dde13a..16ef538 100644 --- a/Usermgm.pm +++ b/Usermgm.pm @@ -302,8 +302,15 @@ sub setPNick { } sub deactivateUser { - my ($nick) = @_; - DB(); + my ($msg, $command) = @_; + + my $nick; + if(defined $msg && $msg =~ /^(\S+)$/){ + $nick = $1; + }else{ + $ND::server->command("notice $ND::nick syntax: .$command user"); + return; + } if (hc()){ my $f = $ND::DBH->prepare("SELECT uid,username FROM users WHERE username ILIKE ?"); $f->execute($nick);