From 13a83c6506f8a6990931ba3e908d72b09debe6c4 Mon Sep 17 00:00:00 2001
From: Daouda Lo <daouda@mandriva.com>
Date: Wed, 22 Oct 2003 15:50:30 +0000
Subject: - don't end wizard if no Mirror site is choosen. - Force mdkupdate
 use

---
 mdkonline | 21 +++++++++------------
 1 file changed, 9 insertions(+), 12 deletions(-)

(limited to 'mdkonline')

diff --git a/mdkonline b/mdkonline
index 2e6eb640..8ebb1a51 100755
--- a/mdkonline
+++ b/mdkonline
@@ -146,16 +146,10 @@ sub gtk_main_quit {
 	[ -f "/root/$login.$passwd.$box_name.online.log.bz2.uue" ] && unlink ("/root/$login.$passwd.$box_name.online.log.bz2.uue");
 	[ -f "/root/$login.$passwd.$box_name.online.log.bz2" ] && unlink ("/root/$login.$passwd.$box_name.online.log.bz2");
     }
-    
-    # setting up the automated updates
-    if ($check_cron->get_active()) {
-	automated_upgrades();
-    }
     # quit
     print N("Quitting Wizard\n");
     Gtk2->main_quit;
 }
-
 sub isalphanum {
     my ($str) = @_;
     if ($str =~ /^[[:alnum:]]+$/) {
@@ -164,9 +158,11 @@ sub isalphanum {
 	return 0;
     }
 }
-    
 sub on_end_clicked {
-    gtk_main_quit();
+    if ($check_cron->get_active()) {
+	my $mirror = $gtkcombo_mirror->entry->get_text();
+	if ($mirror) { automated_upgrades(); gtk_main_quit() } else { info_popup(N('Empty Mirror'), N("Empty Mirror. Please choose a place.")) }
+    }
 }
 
 sub on_next_clicked {
@@ -413,7 +409,8 @@ sub step_wizard {
     my $frame_auto = new Gtk2::Frame(N("automated Upgrades"));
     my $vbox_frame_auto = new Gtk2::VBox(0,0);
     $frame_auto->add($vbox_frame_auto);
-    $vbox_frame_auto->pack_start($check_cron,$false ,$false,1);
+#    $vbox_frame_auto->pack_start($check_cron,$false ,$false,1);
+    $check_cron->set_active(1);
     #$check_cron->set_uposition(70,245);
     my $hboxfr1 = new Gtk2::HBox(0,0);
     my $hboxfr2 = new Gtk2::HBox(0,0);
@@ -421,8 +418,8 @@ sub step_wizard {
     $hboxfr2->pack_start($label_mirror,$true ,$true,5);
     $gtkcombo_mirror->set_popdown_strings('',sort(keys %locations));
     $hboxfr2->pack_end($gtkcombo_mirror,$true ,$true,5);
-    $hboxfr1->set_sensitive(0); 
-    $hboxfr2->set_sensitive(0);
+    $hboxfr1->set_sensitive(1); 
+    $hboxfr2->set_sensitive(1);
     $check_cron->signal_connect (clicked => sub { my $test_cron=$check_cron->get_active(); 
 						  $hboxfr1->set_sensitive($test_cron); 
 						  $hboxfr2->set_sensitive($test_cron); });
@@ -504,7 +501,7 @@ sub set_boxname {
     $box->set_text($b{BOX});
 }
 
-sub info_popup () {
+sub info_popup {
     # must have been translated by the caller
     my ($title,$text) = @_;
     my $popup = new Gtk2::Dialog();
-- 
cgit v1.2.1