retrieve product URL instead of relying on caller to provide it

(thus preventing mcc to ping api.mandriva.com on each startup)

2 files changed, 18 insertions, 0 deletions

diff --git a/NEWS b/NEWS
index 77d6d411..bc932228 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,6 @@
+- mdkapplet-extended-maintenance-helper
+  o retrieve product URL instead of relying on caller to provide it
+
 Version 2.77.15.2 - 25 January 2010, Thierry Vignaud
 
 - mdkapplet
diff --git a/mdkapplet-extended-maintenance-helper b/mdkapplet-extended-maintenance-helper
index bb12d4a4..ab75fe14 100755
--- a/mdkapplet-extended-maintenance-helper
+++ b/mdkapplet-extended-maintenance-helper
@@ -63,6 +63,14 @@ get_extmaint_authentication();
 
 ugtk2::exit(0);
 
+sub get_extended_maintenance_url() {
+    require Rpmdrake::open_db;
+    get_product_id();
+    my @distros = get_distro_list();
+    return if !@distros;
+    my $current_apimdv_distro = find_current_distro(@distros);
+    $current_apimdv_distro->{'extended-maintenance'};
+}
 
 sub get_extmaint_authentication() {
     my $w = ugtk2->new(N("Adding an additional package medium"), width => $width + 20);
@@ -71,6 +79,13 @@ sub get_extmaint_authentication() {
     $password_w = gtknew('Entry');
     $password_w->set_visibility(0);
 
+    my $url = eval { get_extended_maintenance_url() };
+    if (my $err = $@) {
+        interactive->vnew->ask_warn(N("Error"), N("Failure while retrieving distributions list:")
+                                      . "\n$err");
+        return;
+    }
+
     my $res =
       fill_n_run_portable_dialog(
           $w,