summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-07-25 21:30:14 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-07-25 21:30:14 +0000
commit5dc2835bfbf1f53ad51ba540f4423c22cc94b26c (patch)
treeb58e6ee5478457e9b2851cf79f8067f1af1c376a /perl-install/my_gtk.pm
parente556c04ec489070c46bbbc1ebc47ec2613fb5f6e (diff)
downloaddrakx-5dc2835bfbf1f53ad51ba540f4423c22cc94b26c.tar
drakx-5dc2835bfbf1f53ad51ba540f4423c22cc94b26c.tar.gz
drakx-5dc2835bfbf1f53ad51ba540f4423c22cc94b26c.tar.bz2
drakx-5dc2835bfbf1f53ad51ba540f4423c22cc94b26c.tar.xz
drakx-5dc2835bfbf1f53ad51ba540f4423c22cc94b26c.zip
no_comment
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r--perl-install/my_gtk.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index b432e706b..78a308856 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -164,6 +164,7 @@ sub create_notebook(@) {
my $book = shift;
my ($w1, $w2) = map { new Gtk::Label($_) } $title, $title;
+ $book->{widget_title} = $w1;
$n->append_page_menu($book, $w1, $w2);
$book->show;
$w1->show;