From f0f5f655a71276b284542663b5e04f56b4d4b9cc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jo=C3=A3o=20Victor=20Duarte=20Martins?= Date: Mon, 17 May 2010 16:51:04 +0000 Subject: * mdkapplet_gui.pm (open_ask_powerpack_dialog): New dialog asking user to get Powerpack. --- mdkapplet_gui.pm | 35 +++++++++++++++++++++++++++++++++++ 1 file changed, 35 insertions(+) diff --git a/mdkapplet_gui.pm b/mdkapplet_gui.pm index cb0c5afa..5bfd2144 100644 --- a/mdkapplet_gui.pm +++ b/mdkapplet_gui.pm @@ -44,6 +44,7 @@ our @EXPORT = qw( our @EXPORT_OK = qw( run_ask_credentials_dialog run_no_rights_dialog + open_ask_powerpack_dialog ); use mygtk2 qw(gtknew); #- do not import gtkadd which conflicts with ugtk2 version @@ -232,3 +233,37 @@ sub run_no_rights_dialog { ); fill_n_run_portable_dialog($w, \@widgets); } + +sub open_ask_powerpack_dialog { + + my $title = N('Would you like Powerpack?'); + my $w = new_portable_dialog($title); + my @widgets = ( + mdkonline::get_banner($title), + gtknew('Label_Left', + text => N("Since you don't have Powerpack rights " . + "you may visit mandriva store now and " . + "get Powerpack subscription."), + @common), + gtknew('HButtonBox', + layout => 'start', + children_tight => [ + interactive::gtk::add_padding( + new_link_button( + 'http://store.mandriva.com/', + N("Get Powerpack subscription!") + ) + ) + ]), + gtknew('Label_Left', + text => N('Continue to use your new Powerpack ' . + 'account information to upgrade, or ' . + 'Cancel and upgrade to the Free Edition.'), + @common), + ugtk2::create_okcancel($w, + N("Continue and Authenticate!"), + N("Cancel, upgrade to Free Edition")), + ); + + return fill_n_run_portable_dialog($w, \@widgets); +} -- cgit v1.2.1