summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-09-01 12:34:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-09-01 12:34:43 +0000
commit30b881dc48fbcd78093970540164b39fb5667563 (patch)
tree5fc1bd39f5f1311c2416234904ea6ea9d7143192
parent06700528d93b76b4b130b494d6a1f0d2c89dde88 (diff)
downloadperl-MDK-Common-30b881dc48fbcd78093970540164b39fb5667563.tar
perl-MDK-Common-30b881dc48fbcd78093970540164b39fb5667563.tar.gz
perl-MDK-Common-30b881dc48fbcd78093970540164b39fb5667563.tar.bz2
perl-MDK-Common-30b881dc48fbcd78093970540164b39fb5667563.tar.xz
perl-MDK-Common-30b881dc48fbcd78093970540164b39fb5667563.zip
MDK::Common::System::list_users() should list user 500 if it exists
-rw-r--r--MDK/Common/System.pm2
-rw-r--r--perl-MDK-Common.spec5
2 files changed, 5 insertions, 2 deletions
diff --git a/MDK/Common/System.pm b/MDK/Common/System.pm
index 827bd54..de9e3d4 100644
--- a/MDK/Common/System.pm
+++ b/MDK/Common/System.pm
@@ -255,7 +255,7 @@ sub list_skels {
}
sub list_users() {
- map { 500 < $_->[2] && $_->[0] ne "nobody" ? $_->[0] : () } list_passwd();
+ map { 500 <= $_->[2] && $_->[0] ne "nobody" ? $_->[0] : () } list_passwd();
}
diff --git a/perl-MDK-Common.spec b/perl-MDK-Common.spec
index e331a71..9305cdc 100644
--- a/perl-MDK-Common.spec
+++ b/perl-MDK-Common.spec
@@ -2,7 +2,7 @@
# do not change the version here, change in MDK/Common.pm.pl
%define version THEVERSION
-%define release 2mdk
+%define release 3mdk
%ifarch x86_64
%define build_option PERL_CHECKER_TARGET='debug-code BCSUFFIX=""'
@@ -72,6 +72,9 @@ rm -rf $RPM_BUILD_ROOT
# MODIFY IN THE CVS: cvs.mandrakesoft.com:/cooker soft/perl-MDK-Common
%changelog
+* Mon Sep 1 2003 Pixel <pixel@mandrakesoft.com> 1.1.6-3mdk
+- MDK::Common::System::list_users() should list user 500 if it exists
+
* Thu Aug 28 2003 Thierry Vignaud <tvignaud@mandrakesoft.com> 1.1.6-2mdk
- resync perl_checker with to perl-Gtk2-0.95-5mdk