diff options
Diffstat (limited to 'perl-install/interactive')
| -rw-r--r-- | perl-install/interactive/curses.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/interactive/curses.pm b/perl-install/interactive/curses.pm index 90fca4c14..ffeeafd32 100644 --- a/perl-install/interactive/curses.pm +++ b/perl-install/interactive/curses.pm @@ -37,8 +37,8 @@ sub new { sub enter_console { &suspend } sub leave_console { &end } -sub suspend { Curses::UI->leave_curses } -sub resume { Curses::UI->reset_curses } +sub suspend { $cui->leave_curses } +sub resume { $cui->reset_curses } sub end { &suspend; print $SAVEERR $_ foreach cat_($stderr_file); unlink $stderr_file } sub exit { end(); CORE::exit($_[1] || 0) } END { end() } |