a few massmod fixes. blame erry

git-svn-id: http://svn.tabris.net/repos/srsv@3610 70d4eda1-72e9-0310-a436-91e5bd24443c

diff --git a/branches/0.4.3/modules/serviceslibs/operserv.pm b/branches/0.4.3/modules/serviceslibs/operserv.pm
index bee506a726a8430b4996f23245b507df6f54577f..c064a47345ad19a1cbe5d27219adf1470a585df4 100644 (file)
--- a/branches/0.4.3/modules/serviceslibs/operserv.pm
+++ b/branches/0.4.3/modules/serviceslibs/operserv.pm
@@ -1056,14 +1056,14 @@ sub os_loners($@) {
                shift @args;
        }
 
-       return __os_massmod($user, uc 'clones', $cmd, \&chanserv::get_users_nochans, $noid, @args);
+       return __os_massmod($user, 'loners', $cmd, \&chanserv::get_users_nochans, $noid, @args);
 }
 sub os_clones($@) {
        my ($user, @args) = @_;
        my $cmd = shift @args;
        my $target = shift @args;
 
-       return __os_massmod($user, 'Clones', $cmd, \&get_clones, $target, @args);
+       return __os_massmod($user, 'clones', $cmd, \&get_clones, $target, @args);
 }
 
 sub os_killnew($@) {
@@ -1097,11 +1097,11 @@ sub __os_massmod($$$$@) {
                        push @data, [get_user_nick($tuser), (is_online($tuser) ? "\002Online\002" : "\002Offline\002")];
                }
                my $title;
-               if($cmd0 eq 'Clones') {
+               if(lc ($cmd0) eq 'clones') {
                        $title = "$cmd0 matching \002$arg\002";
-               } elsif($cmd0 eq 'Loners') {
+               } elsif(lc ($cmd0) eq 'loners') {
                        $title = "$cmd0 ".($arg ? 'Not identified' : '');
-               } elsif($cmd0 eq 'Loners') {
+               } elsif(lc ($cmd0) eq 'killnew') {
                        $title = "New users ".($arg ? 'Not identified' : '');
                }
                notice($user, columnar {TITLE => $title,