diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/triangles.pl')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/triangles.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/triangles.pl b/Perl/demos/Tk/demos/zinc_lib/triangles.pl index ed1d4cd..2dfba41 100644 --- a/Perl/demos/Tk/demos/zinc_lib/triangles.pl +++ b/Perl/demos/Tk/demos/zinc_lib/triangles.pl @@ -10,7 +10,7 @@ use Tk::Zinc; use strict; -my $defaultfont = '-adobe-helvetica-bold-r-normal-*-120-*-*-*-*-*-*'; +my $defaultfont = '-adobe-helvetica-bold-r-normal--*-120-*-*-*-*-*-*'; my $mw = MainWindow->new(); my $zinc = $mw->Zinc(-width => 700, -height => 300, -font => "10x20", # usually fonts are sets in resources |