From 02e9c2c027ac49dce580521a7279b1968836685d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sat, 14 Apr 2001 12:11:22 +0000
Subject: (wait_message_endW): don't log "none stacked wait-messages" (as a lot
 of them exist...) (waitbox): remove spurious '0' in wait_messages

---
 perl-install/interactive_newt.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/perl-install/interactive_newt.pm b/perl-install/interactive_newt.pm
index a94748a70..1c63591b1 100644
--- a/perl-install/interactive_newt.pm
+++ b/perl-install/interactive_newt.pm
@@ -205,7 +205,7 @@ sub ask_from_entries_refW {
 
 sub waitbox {
     my ($title, $messages) = @_;
-    my ($t, $w, $h) = myTextbox(1, 0, @$messages);
+    my ($t, $w, $h) = myTextbox(1, @$messages);
     my $f = Newt::Component::Form(\undef, '', 0);
     Newt::CenteredWindow($w, $h, $title);
     $f->FormAddComponent($t);
@@ -229,7 +229,8 @@ sub wait_message_nextW {
 }
 sub wait_message_endW {
     my ($o, $w) = @_;
-    log::l("interactive_newt does not handle none stacked wait-messages") if $w->{form} != pop @wait_messages;
+    my $wait = pop @wait_messages;
+#    log::l("interactive_newt does not handle none stacked wait-messages") if $w->{form} != $wait;
     Newt::PopWindow;
 }
 
-- 
cgit v1.2.1