From 5ef344820697f8a6e07359bf9b29b969c7ce37b0 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 27 Jan 2010 17:25:31 +0000 Subject: (is_extmaint_supported) factorize test for extended maintenance and alter it btw --- mdkonline.pm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'mdkonline.pm') diff --git a/mdkonline.pm b/mdkonline.pm index 7ade89e9..6378ccca 100644 --- a/mdkonline.pm +++ b/mdkonline.pm @@ -41,6 +41,7 @@ our @EXPORT = qw(find_current_distro get_urpmi_options is_it_2008_0 is_enterprise_media_supported + is_extmaint_supported is_restricted_media_supported translate_product xml2perl @@ -73,6 +74,10 @@ sub is_it_2008_0() { $product_id->{version} eq '2008.0'; } +sub is_extmaint_supported() { + $product_id->{support} eq 'extended' +} + sub is_enterprise_media_supported() { return if is_it_2008_0(); to_bool($product_id->{type} eq 'Enterprise' && $product_id->{product} eq 'Server'); -- cgit v1.2.1