X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;ds=sidebyside;f=Members.pm;fp=Members.pm;h=e60ecde6820886bfa35f0dc04f8d98ad75dd42c2;hb=9b9f9324f849f89d812a73e6f7fdc36205b24e92;hp=bbe41c9bce2c7238b73470a2ebfea0a7d4cf81ea;hpb=7ca93b2c5901c56f383e645b5d1985ab7f65635d;p=NDIRC.git diff --git a/Members.pm b/Members.pm index bbe41c9..e60ecde 100644 --- a/Members.pm +++ b/Members.pm @@ -100,18 +100,18 @@ sub checkPoints { } sub findSMS { - my ($nick) = @_; - DB(); - my $f; + my ($nick,$command) = @_; + unless (defined $nick){ + $ND::server->command("notice $ND::nick syntax: .$command nick | % can be used for wildcards \%arro\% will match barrow"); + return; + } if (officer() || dc()){ - $f = $ND::DBH->prepare("SELECT username,COALESCE(sms,'nothing added') FROM users WHERE username ILIKE ?"); + my $f = $ND::DBH->prepare("SELECT username,COALESCE(sms,'nothing added') FROM users WHERE username ILIKE ?"); if (my ($username,$sms) = $ND::DBH->selectrow_array($f,undef,$nick)){ - $ND::server->command("notice $ND::target $ND::B$username$ND::B has sms $ND::B$sms$ND::B"); + $ND::server->command("notice $ND::nick $ND::B$username$ND::B has sms $ND::B$sms$ND::B"); }else{ - $ND::server->command("notice $ND::target No hit, maybe spelling mistake, or add % as wildcard"); + $ND::server->command("notice $ND::nick No hit, maybe spelling mistake, or add % as wildcard"); } - }else{ - $ND::server->command("notice $ND::target Only dcs and above are allowed to check for others"); } }