From 9b0e28df5dfa4d7d0598b9060811774af1840b69 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 5 Mar 2010 15:02:45 +0000
Subject: [PATCH] -Hide system accounts from listclusterusers output

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5390 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/perl/xCAT/ADUtils.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/xCAT-server/lib/perl/xCAT/ADUtils.pm b/xCAT-server/lib/perl/xCAT/ADUtils.pm
index d32add379..c2bf74e72 100644
--- a/xCAT-server/lib/perl/xCAT/ADUtils.pm
+++ b/xCAT-server/lib/perl/xCAT/ADUtils.pm
@@ -164,7 +164,7 @@ sub list_user_accounts { #provide enough data to construct an /etc/passwd lookin
     $domain_components =~ s/^/dc=/;
     my @searchcmd = qw/ldapsearch  -H /;
     push @searchcmd,"ldaps://$directoryserver","-b",$domain_components;
-    push @searchcmd,qw/(&(objectClass=user)(!(objectClass=computer))) sAMAccountName unixHomeDirectory uidNumber gidNumber cn loginShell/;
+    push @searchcmd,qw/(&(&(objectClass=user)(!(objectClass=computer)))(!(isCriticalSystemObject=TRUE))) sAMAccountName unixHomeDirectory uidNumber gidNumber cn loginShell/;
     my $searchout;
     my $searchin;
     my $searcherr = gensym;