summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-07-10 17:40:31 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-07-10 17:40:31 +0000
commit6e2a02e0f2548d42f466109b3388ba709ad416d5 (patch)
tree7964cb1d3ce627b858a0e0e1c7aef6cff0d671fe /perl-install
parent21aa3d6311b76697f6014ef47ddc31c10497107c (diff)
downloaddrakx-6e2a02e0f2548d42f466109b3388ba709ad416d5.tar
drakx-6e2a02e0f2548d42f466109b3388ba709ad416d5.tar.gz
drakx-6e2a02e0f2548d42f466109b3388ba709ad416d5.tar.bz2
drakx-6e2a02e0f2548d42f466109b3388ba709ad416d5.tar.xz
drakx-6e2a02e0f2548d42f466109b3388ba709ad416d5.zip
output buffer should not be editable
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakfloppy3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone/drakfloppy b/perl-install/standalone/drakfloppy
index 4f128d746..e68241cc3 100755
--- a/perl-install/standalone/drakfloppy
+++ b/perl-install/standalone/drakfloppy
@@ -167,7 +167,7 @@ $window->{window}->add(
Gtk2::HBox->new(0, 0),
5),
30, 75),
- 1, $output = Gtk2::TextView->new,
+ 1, $output = gtkset_editable(Gtk2::TextView->new, 0),
),
),
0, gtkpack__(new Gtk2::HBox(0, 0),
@@ -246,6 +246,7 @@ sub expand_tree {
my ($tree, $parent_iter, $path) = @_;
my $dir = $tree_model->get($parent_iter, 1);
my $child = $tree_model->iter_children($parent_iter);
+ print "($tree, $parent_iter, $path, $dir, $child)\n";
return if !$child;
#- hackish: if first child has '' as name, then we need to expand on the fly