diff --git a/Irpg/Admin.pm b/Irpg/Admin.pm index 149b521e752462a3beb387227b68aadb42e19de8..d0131c45a2a94f7dfe50b4bfb7061a1bd2dd2a52 100644 --- a/Irpg/Admin.pm +++ b/Irpg/Admin.pm @@ -32,7 +32,7 @@ sub leave_chans { sub peval { my ($userhost, $usernick, $username, $source, @arg) = @_; - if ($opts->{ownerpevalonly} && $opts->{owner} ne $username) { + if ($opts->{ownerpevalonly} && $opts->{owner} ne $usernick) { Irpg::Irc::privmsg("You don't have access to PEVAL.", $usernick); } else { @@ -80,7 +80,7 @@ sub delacct { sub mkadmin { my ($userhost, $usernick, $username, $source, @arg) = @_; - if ($opts->{owneraddonly} && $opts->{owner} ne $username) { + if ($opts->{owneraddonly} && $opts->{owner} ne $usernick) { Irpg::Irc::privmsg("You don't have access to MKADMIN.", $usernick); } elsif (!defined($arg[0])) { @@ -97,7 +97,7 @@ sub mkadmin { sub rmadmin { my ($userhost, $usernick, $username, $source, @arg) = @_; - if ($opts->{ownerdelonly} && $opts->{owner} ne $username) { + if ($opts->{ownerdelonly} && $opts->{owner} ne $usernick) { Irpg::Irc::privmsg("You don't have access to RMADMIN.", $usernick); } elsif (!defined($arg[0])) {