diff options
| author | Olivier Blin <oblin@mandriva.com> | 2009-10-22 17:25:42 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2009-10-22 17:25:42 +0000 |
| commit | 30159888f459d6307c37e0017021ba703f7a90d3 (patch) | |
| tree | 34a95b2a8e65bb15faeae1c0ee34de2b22dd12fc /perl-install | |
| parent | 429364130579b0282cfef9fae0bf86b620c34333 (diff) | |
| download | drakx-30159888f459d6307c37e0017021ba703f7a90d3.tar drakx-30159888f459d6307c37e0017021ba703f7a90d3.tar.gz drakx-30159888f459d6307c37e0017021ba703f7a90d3.tar.bz2 drakx-30159888f459d6307c37e0017021ba703f7a90d3.tar.xz drakx-30159888f459d6307c37e0017021ba703f7a90d3.zip | |
curses backend: do not crash when resuming interface
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/interactive/curses.pm | 4 |
3 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index b9565aebf..a2003342e 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,5 @@ +- curses backend: do not crash when resuming interface + Version 12.68 - 19 October 2009 - avoid error messages when using lvm in draklive-install (#36415) diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 6cce3b6c4..db429a979 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,5 @@ +- curses backend: do not crash when resuming interface + Version 12.69 - 21 October 2009 - user management: 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() } |