diff options
Diffstat (limited to 'mgaonline.pm')
| -rw-r--r-- | mgaonline.pm | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/mgaonline.pm b/mgaonline.pm index 43a149f8..ff64b624 100644 --- a/mgaonline.pm +++ b/mgaonline.pm @@ -45,7 +45,6 @@ our @EXPORT = qw(find_current_distro get_release get_stale_upgrade_filename get_urpmi_options - is_extmaint_supported read_sys_config translate_product xml2perl @@ -56,7 +55,6 @@ our @EXPORT = qw(find_current_distro our @EXPORT_OK = qw( get_product_info get_my_mdv_profile - add_medium_extended ); our (%config, $product_id, $root); @@ -84,11 +82,6 @@ sub get_release() { ($r); } -sub is_extmaint_supported() { - return; # NOT SUPPORTED ON MAGEIA - $product_id->{support} eq 'extended'; -} - sub find_current_distro { find { $_->{version} eq $product_id->{version} } @_; } @@ -186,19 +179,6 @@ sub get_urpmi_options() { ({ sensitive_arguments => 1 }, 'urpmi.addmedia', '--xml-info', 'always'); } -sub add_medium_extended { - my ($email, $password, $version, $arch) = @_; - my $uri = sprintf("https://%s:%s\@dl.FIXME.com/extended/%s/%s", - uri_escape($email), - uri_escape($password), - $version, - $arch); - my @options = (get_urpmi_options(), '--update'); - run_program::raw(@options, - "Extended Maintenance $arch " . int(rand(100000)), - ${uri}); -} - sub is_running { my ($name) = @_; my $found; |