summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-12-16 07:40:08 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-12-16 07:40:08 +0000
commitb0f86a6e308c06ca314f1a9988e0fec3c604527a (patch)
treed8926e20af2dc6acb87f3287bd5871a7e63f9e09 /perl-install
parent164e83d527f7a221aca3a7ca5bba38055b2d1cef (diff)
downloaddrakx-b0f86a6e308c06ca314f1a9988e0fec3c604527a.tar
drakx-b0f86a6e308c06ca314f1a9988e0fec3c604527a.tar.gz
drakx-b0f86a6e308c06ca314f1a9988e0fec3c604527a.tar.bz2
drakx-b0f86a6e308c06ca314f1a9988e0fec3c604527a.tar.xz
drakx-b0f86a6e308c06ca314f1a9988e0fec3c604527a.zip
build automatically the font description if needed
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 9477bd283..152d4eaa6 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -531,7 +531,7 @@ sub gtkfontinfo {
sub gtkmodify_font {
my ($w, $arg) = @_;
- $w->modify_font($arg);
+ $w->modify_font(ref($arg) ? $arg : Gtk2::Pango::FontDescription->from_string($arg));
$w;
}