summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2008-10-02 10:41:47 +0000
committerOlivier Blin <oblin@mandriva.com>2008-10-02 10:41:47 +0000
commit7dc8614b9840346e53f135112b9fced82527dcbf (patch)
tree91f6926b115b0d5dcafe916404699b184b63264a /perl-install/pkgs.pm
parent5cb13bdecad5a9e707cc6a11f5082795da1b80e2 (diff)
downloaddrakx-7dc8614b9840346e53f135112b9fced82527dcbf.tar
drakx-7dc8614b9840346e53f135112b9fced82527dcbf.tar.gz
drakx-7dc8614b9840346e53f135112b9fced82527dcbf.tar.bz2
drakx-7dc8614b9840346e53f135112b9fced82527dcbf.tar.xz
drakx-7dc8614b9840346e53f135112b9fced82527dcbf.zip
use functions to get rpmsrate levels
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm9
1 files changed, 7 insertions, 2 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 2372a576f..d866218ac 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -7,8 +7,13 @@ use run_program;
use detect_devices;
use log;
-our $rpmsrate_rate_max = 5; # also defined in perl-URPM
-our $rpmsrate_rate_default = 4;
+sub rpmsrate_rate_max() {
+ 5; # also defined in perl-URPM
+}
+
+sub rpmsrate_rate_default() {
+ 4;
+}
sub read_rpmsrate_raw {
my ($file) = @_;