diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-08-06 19:12:37 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-08-06 19:12:37 +0000 |
commit | b684ed467490ecc1eda1fdc3048e9dc6ab4a390f (patch) | |
tree | f88e4dd9ea39fd0cde97c7d82efbc143d1d98b08 /perl-install | |
parent | e5dbb1eb7abc4f0e63e4da24acbb605eb4a21338 (diff) | |
download | drakx-b684ed467490ecc1eda1fdc3048e9dc6ab4a390f.tar drakx-b684ed467490ecc1eda1fdc3048e9dc6ab4a390f.tar.gz drakx-b684ed467490ecc1eda1fdc3048e9dc6ab4a390f.tar.bz2 drakx-b684ed467490ecc1eda1fdc3048e9dc6ab4a390f.tar.xz drakx-b684ed467490ecc1eda1fdc3048e9dc6ab4a390f.zip |
cleanup, functions already defined in interactive
Diffstat (limited to 'perl-install')
-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; |