diff options
-rwxr-xr-x | control-center | 47 |
1 files changed, 0 insertions, 47 deletions
diff --git a/control-center b/control-center index 0808fe4f..a5d3edc3 100755 --- a/control-center +++ b/control-center @@ -1221,7 +1221,6 @@ my $release = mandrake_release_info(); my @menu_items = ( [ N("/_File"), undef, undef, undef, '<Branch>' ], - [ N("/_File") . N("/_Upload the hardware list"), N("<control>U"), \&upload, undef, '<Item>' ], [ N("/_File") . N("/_Quit"), N("<control>Q"), \&quit_global, undef, '<Item>', N("Quit") ], [ N("/_Options"), undef, undef, undef, '<Branch>' ], [ join('', @{$options{show_log}}), undef, @@ -1626,52 +1625,6 @@ sub warn_on_startup() { } } -sub upload() { - my $dialog = _create_dialog(N("Upload the hardware list"), - { transient => $window_global->{real_window} }); #, height => 400 - gtkpack($dialog->vbox, - gtkset_markup(Gtk2::Label->new, qq(<span weight="bold">) . N("Upload the hardware list") . "</span>\n"), - create_packtable({ col_spacings => 10, row_spacings => 5, mcc => 1 }, - [ N("Account:"), my $account_w = Gtk2::Entry->new ], - [ N("Password:"), my $password_w = Gtk2::Entry->new ], - [ N("Hostname:"), my $system_name_w = Gtk2::Entry->new ], - ), - ); -$password_w->set_visibility(0); #set_invisible_char('*'); - - my ($password, $account, $name); - gtkadd($dialog->action_area, - create_okcancel( - { - cancel_clicked => sub { $dialog->destroy; Gtk2->main_quit }, - ok_clicked => sub { - $name = $system_name_w->get_text; - $account = $account_w->get_text; - $password = $password_w->get_text; - $dialog->destroy; - Gtk2->main_quit; - }, - }, - undef, undef, '', - ), - ); - - $dialog->set_has_separator(0); - $dialog->show_all; - Gtk2->main; - if ($account) { - require interactive; - my $_wait = 'interactive'->vnew->wait_message(N("Please wait"), N("Uploading in progress")); - #info_dialog(N("Please wait"), N("Uploading in progress")); - - local $ENV{HWDB_PASSWD} = $password; - require run_program; - run_program::run("/usr/sbin/hwdb_add_system", $account, $name); - run_program::raw({ detach => 1 }, "/usr/bin/www-browser", 'http://hcl.mandriva.com/'); - } -} - - #------------------------------------------------------------- # socket/plug managment |