}
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");
}
}