diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/testGraphics.pl')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/testGraphics.pl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/testGraphics.pl b/Perl/demos/Tk/demos/zinc_lib/testGraphics.pl index 5da149b..6c9eb76 100644 --- a/Perl/demos/Tk/demos/zinc_lib/testGraphics.pl +++ b/Perl/demos/Tk/demos/zinc_lib/testGraphics.pl @@ -6,11 +6,11 @@ # # Authors: Jean-Luc Vinot <vinot@cena.fr> # -# $Id$ +# $Id: testGraphics.pl 1548 2004-09-21 12:41:55Z mertz $ #----------------------------------------------------------------------------------- use vars qw( $VERSION ); -($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/); +($VERSION) = sprintf("%d.%02d", q$Revision: 1548 $ =~ /(\d+)\.(\d+)/); use Tk; use Tk::Zinc; @@ -30,7 +30,8 @@ my ($dx, $dy); my $tabanchor = 'n'; my $tabalign = 'left'; -my $font_9b = '7x13bold'; +# my $font_9b = '7x13bold'; +my $font_9b = ":pixelsize=12"; # the original font is not standard, even if it is fully free: # my $font_9b = '-cenapii-bleriot mini-bold-r-normal--9-90-75-75-p-75-iso8859-15'; |