From 68df8b379529df413788a324044127f0a89476a0 Mon Sep 17 00:00:00 2001
From: Angelo Naselli <anaselli@linux.it>
Date: Sat, 11 Oct 2014 17:43:52 +0200
Subject: just get uid once

---
 lib/AdminPanel/Shared/Users.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lib/AdminPanel')

diff --git a/lib/AdminPanel/Shared/Users.pm b/lib/AdminPanel/Shared/Users.pm
index 1c5b6a4..52e939b 100644
--- a/lib/AdminPanel/Shared/Users.pm
+++ b/lib/AdminPanel/Shared/Users.pm
@@ -820,8 +820,9 @@ sub getUsersInfo {
 
     my @UserReal;
   LOOP: foreach my $l (@{$users}) {
-        next LOOP if $filterusers && $l->Uid($self->USER_GetValue) <= 499 || $l->Uid($self->USER_GetValue) == 65534;
-        next LOOP if $filterusers && $l->Uid($self->USER_GetValue) > 499 && $l->Uid($self->USER_GetValue) < $self->min_UID &&
+        my $uid = $l->Uid($self->USER_GetValue);
+        next LOOP if $filterusers && $uid <= 499 || $uid == 65534;
+        next LOOP if $filterusers && $uid > 499 && $uid < $self->min_UID &&
                      ($l->HomeDir($self->USER_GetValue) =~ /^\/($|var\/|run\/)/ || $l->LoginShell($self->USER_GetValue) =~ /(nologin|false)$/);
         push @UserReal, $l if $l->UserName($self->USER_GetValue) =~ /^\Q$strfilt/;
     }
-- 
cgit v1.2.1