summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-09-15 17:31:22 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-09-15 17:31:22 +0000
commit71412b3a34bbb1b5056ace130334917bfa6076be (patch)
tree5af9cdef0ea08f9bb81e1026fc1e27be7990bfb3 /perl-install/my_gtk.pm
parentfec9449e69b0705b7ef85d9617d36e56f66628a4 (diff)
downloaddrakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar
drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar.gz
drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar.bz2
drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar.xz
drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.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 33f753638..f3228358f 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -163,7 +163,7 @@ sub gtkset_default_fontset($) {
my ($fontset) = @_;
my $style = Gtk::Widget->get_default_style;
- my $f = Gtk::Gdk::Font->fontset_load($fontset) or die;
+ my $f = Gtk::Gdk::Font->fontset_load($fontset) or die '';
$style->font($f);
Gtk::Widget->set_default_style($style);
}