Francisco Alcaraz <[EMAIL PROTECTED]> writes:
> Using the console I have the next messages:
>
> Is gtk2-perl missing Gtk2::Text::insert ?
> Call trace:
> Gtk2::_Object::AUTOLOAD() called from /usr/sbin/drakfloppy:311
> main::build_it() called from /usr/lib/libDrakX/ugtk2.pm:849
> (eval)() called from /usr/lib/libDrakX/ugtk2.pm:849
> ugtk2::main() called from /usr/sbin/drakfloppy:192
thanks for the report.
here's the fix:
Index: standalone/drakfloppy
===================================================================
RCS file: /cooker/gi/perl-install/standalone/drakfloppy,v
retrieving revision 1.27
diff -u -p -r1.27 drakfloppy
--- standalone/drakfloppy 27 Feb 2003 09:45:09 -0000 1.27
+++ standalone/drakfloppy 4 Apr 2003 08:59:57 -0000
@@ -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);