diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl b/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl index 86f419f..8e3ca9d 100644 --- a/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl +++ b/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl @@ -13,7 +13,7 @@ use Tk::Zinc; use strict; use Tk::Zinc::Logo; # this module implements a class which instances are Zinc logo! -my $defaultfont = '-adobe-helvetica-bold-r-normal-*-140-*-*-*-*-*-*'; +my $defaultfont = '-adobe-helvetica-bold-r-normal--*-140-*-*-*-*-*-*'; my $mw = MainWindow->new(); my $text = $mw->Scrolled(qw/Text -relief sunken -borderwidth 2 -setgrid true -height 7 -scrollbars ''/); |