From f3d01f7b0c07697265c417452df92955555cd66f Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Fri, 4 Apr 2003 09:01:34 +0000
Subject: fix crash on floppy generation reported by Francisco Alcaraz

---
 perl-install/standalone/drakfloppy | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'perl-install/standalone/drakfloppy')

diff --git a/perl-install/standalone/drakfloppy b/perl-install/standalone/drakfloppy
index d9cc103c6..addace84a 100755
--- a/perl-install/standalone/drakfloppy
+++ b/perl-install/standalone/drakfloppy
@@ -166,8 +166,7 @@ $window->{window}->add(
                                                                                            Gtk2::HBox->new(0, 0),
                                                                                            5),
                                                                        30, 75),
-                                                   1, $output = new Gtk2::Text(undef, undef),
-                                                   0, Gtk2::VScrollbar->new($output->vadj),
+                                                   1, $output = Gtk2::TextView->new,
                                                   ),
                                          ),
                                 0, gtkpack__(new Gtk2::HBox(0, 0),
@@ -308,7 +307,7 @@ sub build_it {
     open STATUS, $co or do { create_dialog(N("Unable to fork: %s", $!), 0); return };
     local $_;
     while (<STATUS>) {
-        $output->insert(undef, undef, undef, $_);
+        gtktext_append($output, [ [ $_ ] ]);
     }
     close STATUS or create_dialog(N("Unable to properly close mkbootdisk: \n %s \n %s", $!, $?), 0);
   
-- 
cgit v1.2.1