aboutsummaryrefslogtreecommitdiffstats
path: root/lib/AdminPanel/Module/Users.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/AdminPanel/Module/Users.pm')
-rw-r--r--lib/AdminPanel/Module/Users.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/AdminPanel/Module/Users.pm b/lib/AdminPanel/Module/Users.pm
index 4e710b3..dbf6962 100644
--- a/lib/AdminPanel/Module/Users.pm
+++ b/lib/AdminPanel/Module/Users.pm
@@ -77,6 +77,7 @@ use USER;
use utf8;
use Sys::Syslog;
use Glib;
+use English;
use yui;
use AdminPanel::Shared::GUI;
use AdminPanel::Shared::Locales;
@@ -141,7 +142,7 @@ sub _USERInitialize {
my $self = shift;
# $EUID: effective user identifier
- if ($> == 0) {
+ if ($EUID == 0) {
return USER::ADMIN->new;
}
@@ -851,7 +852,7 @@ sub addUserDialog {
my $self = shift;
my $standalone = shift;
- if ($> != 0) {
+ if ($EUID != 0) {
$self->sh_gui->warningMsgBox({
title => $self->name,
text => $self->loc->N("root privileges required"),
@@ -2486,7 +2487,7 @@ sub _refreshActions {
sub _manageUsersDialog {
my $self = shift;
- if ($> != 0) {
+ if ($EUID != 0) {
$self->sh_gui->warningMsgBox({
title => $self->name,
text => $self->loc->N("root privileges required"),