summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2002-01-03 14:48:28 +0000
committerdamien <damien@mandriva.com>2002-01-03 14:48:28 +0000
commit51c62f928f9d8810b67f8703f8a85d60a91f3801 (patch)
tree296fa727168a8e52a9a848d45806185afc0d0e8a /perl-install/standalone
parent9ee64ee511ed194e1022e10fba19cbf7629bd316 (diff)
downloaddrakx-backup-do-not-use-51c62f928f9d8810b67f8703f8a85d60a91f3801.tar
drakx-backup-do-not-use-51c62f928f9d8810b67f8703f8a85d60a91f3801.tar.gz
drakx-backup-do-not-use-51c62f928f9d8810b67f8703f8a85d60a91f3801.tar.bz2
drakx-backup-do-not-use-51c62f928f9d8810b67f8703f8a85d60a91f3801.tar.xz
drakx-backup-do-not-use-51c62f928f9d8810b67f8703f8a85d60a91f3801.zip
user can be equal to 500
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakbackup2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup
index c3a4169a4..00a00e217 100755
--- a/perl-install/standalone/drakbackup
+++ b/perl-install/standalone/drakbackup
@@ -269,7 +269,7 @@ sub read_passwd {
my @tmp1;
my @tmp2;
@user_and_path_list = map {
- (split(':', $_))[0] . ":" . (split(':', $_))[5] } grep {( split(':', $_))[2] > 500} split ('\n', cat_('/etc/passwd'));
+ (split(':', $_))[0] . ":" . (split(':', $_))[5] } grep {( split(':', $_))[2] >= 500} split ('\n', cat_('/etc/passwd'));
$DEBUG and print "user_and_path_list: ".$_."\n" foreach (@user_and_path_list);
@user_list = ();
@all_user_list = ();