diff options
-rw-r--r-- | perl-install/interactive_gtk.pm | 3 | ||||
-rw-r--r-- | perl-install/interactive_newt.pm | 3 |
2 files changed, 0 insertions, 6 deletions
diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm index 21c296be4..67d8ddd68 100644 --- a/perl-install/interactive_gtk.pm +++ b/perl-install/interactive_gtk.pm @@ -19,9 +19,6 @@ sub new { sub enter_console { my ($o) = @_; $o->{suspended} = common::setVirtual(1) } sub leave_console { my ($o) = @_; common::setVirtual(delete $o->{suspended}) } -sub suspend {} -sub resume {} - sub exit { gtkset_mousecursor_normal(); #- for restoring a normal in any case on standalone my_gtk::flush(); diff --git a/perl-install/interactive_newt.pm b/perl-install/interactive_newt.pm index 0662d9a4d..9def62960 100644 --- a/perl-install/interactive_newt.pm +++ b/perl-install/interactive_newt.pm @@ -234,8 +234,5 @@ sub wait_message_endW { Newt::PopWindow; } -sub kill { -} - 1; |