diff options
| -rw-r--r-- | NEWS | 1 | ||||
| -rwxr-xr-x | lib/MDV/Control_Center.pm | 22 |
2 files changed, 21 insertions, 2 deletions
@@ -1,5 +1,6 @@ - extended maintenance tool: o fix providing the right version + o provide the URL Version 12.18 - 22 January 2010, Thierry Vignaud diff --git a/lib/MDV/Control_Center.pm b/lib/MDV/Control_Center.pm index 6b36bea1..f8188783 100755 --- a/lib/MDV/Control_Center.pm +++ b/lib/MDV/Control_Center.pm @@ -36,6 +36,22 @@ our @EXPORT = qw( our ($version) = cat_("/etc/mandrakelinux-release") =~ /\b(\d+\.\d+)/; +my $extended_maintenance_url; + +eval { + use lib qw(/usr/lib/libDrakX/drakfirsttime); + use mdkonline; + require Rpmdrake::open_db; + get_product_id(); + my @distros = get_distro_list(); + return if !@distros; + my $current_apimdv_distro = find_current_distro(@distros); + use Data::Dumper; warn Dumper $current_apimdv_distro; + $extended_maintenance_url = $current_apimdv_distro->{'extended-maintenance'}; +}; +if (my $err = $@) { + warn "failed to retrieve distro list: $err\n"; +} #------------------------------------------------------------- # paths @@ -604,13 +620,15 @@ our %programs = icon => 'rpmdrake-mdk', }, + + if_($extended_maintenance_url, "Extended Maintenance" => { - binary => "$sbindir/mdkapplet-extended-maintenance-helper $version", + binary => "$sbindir/mdkapplet-extended-maintenance-helper $version $extended_maintenance_url", embedded => 1, description => N("Access to extended maintenance"), icon => 'extended_maintenance', - }, + }), "Tomoyo Policy" => |