summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-10-15 00:49:48 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-10-15 00:49:48 +0000
commit1bd0d70a43bc734b826ae3f181b057aa22c977d7 (patch)
treed6d052d0b5944dd308dbe5b496f0767a9ff3891c /perl-install/my_gtk.pm
parent613c0e3b6d083c8a552e6e8b34bf0e52a4b4f23b (diff)
downloaddrakx-backup-do-not-use-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar
drakx-backup-do-not-use-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar.gz
drakx-backup-do-not-use-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar.bz2
drakx-backup-do-not-use-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar.xz
drakx-backup-do-not-use-1bd0d70a43bc734b826ae3f181b057aa22c977d7.zip
no_comment
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r--perl-install/my_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 02812483f..8eefa123c 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -201,7 +201,7 @@ sub create_box_with_title($@) {
@_ = map { ref $_ ? $_ : warp_text($_) } @_;
$o->{box} = gtkpack_(new Gtk::VBox(0,0),
- map({
+ (map{
my $w = ref $_ ? $_ : new Gtk::Label($_);
$w->set_name("Title");
0, $w;