summaryrefslogtreecommitdiffstats
path: root/mdkapplet
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2010-01-21 22:44:18 +0000
committerThierry Vignaud <tv@mandriva.org>2010-01-21 22:44:18 +0000
commit5c00ea21368ddadf5504923e543f4d8e9b3658d6 (patch)
tree12c89eca4e931454da6538158c8b9a58d32f393a /mdkapplet
parentab271008dbfecc725fafdfb4aa41e7d1a6e0f7db (diff)
downloadmgaonline-5c00ea21368ddadf5504923e543f4d8e9b3658d6.tar
mgaonline-5c00ea21368ddadf5504923e543f4d8e9b3658d6.tar.gz
mgaonline-5c00ea21368ddadf5504923e543f4d8e9b3658d6.tar.bz2
mgaonline-5c00ea21368ddadf5504923e543f4d8e9b3658d6.tar.xz
mgaonline-5c00ea21368ddadf5504923e543f4d8e9b3658d6.zip
allow to get extended maintenance on some distributions
Diffstat (limited to 'mdkapplet')
-rwxr-xr-xmdkapplet89
1 files changed, 87 insertions, 2 deletions
diff --git a/mdkapplet b/mdkapplet
index 1e0978c2..b445daf5 100755
--- a/mdkapplet
+++ b/mdkapplet
@@ -233,7 +233,7 @@ $icon->signal_connect(activate => sub {
no_enabled_medium => \&add_media,
updates => \&installUpdates,
new_distribution => \&upgrade,
- no_more_supported => \&upgrade,
+ no_more_supported => \&no_more_supported,
);
my $action = $state_global;
# default to updates rather than distro upgrade:
@@ -480,6 +480,91 @@ sub confirm_upgrade() {
}
}
+
+sub _get_obsolete_message() {
+ join("\n\n",
+ N("The version of Mandriva Linux installed on your system is no longer supported."),
+ N("In order to keep your system secure, you can:"),
+ );
+}
+
+sub no_more_supported_choice() {
+ local $mygtk2::left_padding = 0;
+ my $warn_me = text2bool($local_config{DO_NOT_ASK_FOR_NO_MORE_SUPPORTED});
+ # FIXME: just tell radio buttons' children to wrap instead:
+ local $mdkapplet_gui::width = 580;
+ my $w = new_portable_dialog(N("Your distribution is no more supported"));
+ my ($b1, $b2, $b3);
+ my $choice = $extended_maintenance_url ? 'extended' : ($no_more_supported ne 'none' ? 'upgrade' : undef);
+
+ my @widgets = (
+ get_banner(),
+ gtknew('Label_Left',
+ text => _get_obsolete_message() . "\n", @common),
+ if_($extended_maintenance_url,
+ $b1 = gtknew('RadioButton',
+ text => N("Get long term support for your currently installed distribution"),
+ toggled => sub {
+ ($choice, $warn_me) = ('extended', undef) if $_[0]->get_active;
+ },
+
+ ),
+ gtknew('HSeparator'),
+ ),
+ if_($no_more_supported ne 'none',
+ $b2 = gtknew('RadioButton', child => gtknew('VButtonBox', layout => 'start', children_tight => [
+ gtknew('Label_Left',
+ text => N("Do you want to upgrade to the '\%s' distribution?",
+ $new_distro->{name} || $new_distro->{version}), @common),
+ new_link_button($new_distro->{url}, N("More info about this new version")),
+ ]),
+ toggled => sub {
+ ($choice, $warn_me) = ('upgrade', undef) if $_[0]->get_active;
+ },
+ if_($b1, group => $b1)),
+ gtknew('HSeparator'),
+ ),
+ $b3 = gtknew('RadioButton', text => N("Do not ask me next time"),
+ toggled => sub {
+ $choice = 'nothing' if $_[0]->get_active;
+ $warn_me = $_[0]->get_active },
+ group => $b1 || $b2),
+ create_okcancel($w, N("Next"), N("Cancel")),
+ );
+
+ #$_ and $_->set_border_width(8) foreach $b1, $b2, $b3;
+
+ my $res = fill_n_run_portable_dialog($w, \@widgets);
+
+ setVar('DO_NOT_ASK_FOR_NO_MORE_SUPPORTED', bool2text($warn_me));
+ $local_config{DO_NOT_ASK_FOR_NO_MORE_SUPPORTED} = bool2text($warn_me);
+ if ($res) {
+ return $choice;
+ } else {
+ return 0;
+ }
+}
+
+
+sub no_more_supported() {
+ return if $mdv_update_pid;
+ my $choice = no_more_supported_choice();
+ if ($choice eq 'upgrade') {
+ really_confirm_upgrade() and real_upgrade();
+ } elsif ($choice eq 'extended') {
+ get_extended_maintenance();
+ }
+}
+
+
+sub get_extended_maintenance() {
+ $mdv_update_pid = fork_exec('mdkapplet-extended-maintenance-helper', $product_id->{version},
+ $extended_maintenance_url,
+ if_($download_all, "--download-all=$download_dir"),
+ if_($root, "--urpmi-root=$root"));
+}
+
+
sub really_confirm_upgrade() {
local $mygtk2::left_padding = 0;
my $w = ugtk2->new(N("New version of Mandriva Linux distribution"), width => $width + 20);
@@ -738,7 +823,7 @@ sub setState {
my $bubble = Gtk2::Notify->new_with_status_icon(N("Warning"), formatAlaTeX(translate($state{$state}{tt}[0])) . "\n",
'/usr/share/icons/mdkonline.png', $icon);
if (member($state, qw(new_distribution no_more_supported))) {
- $bubble->add_action('clicked', N("More Information"), \&upgrade);
+ $bubble->add_action('clicked', N("More Information"), \&no_more_supported);
if ($sub_state eq 'updates') {
push @arr, 'update';
}