diff options
Diffstat (limited to 'Perl')
-rw-r--r-- | Perl/t/Text2.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Perl/t/Text2.t b/Perl/t/Text2.t index 2087bc2..868955a 100644 --- a/Perl/t/Text2.t +++ b/Perl/t/Text2.t @@ -1,7 +1,7 @@ #!/usr/bin/perl -w # -# $Id: Text2.t,v 1.1 2005-05-11 12:54:19 lecoanet Exp $ +# $Id: Text2.t,v 1.2 2005-06-21 21:14:34 mertz Exp $ # Author: Christophe Mertz # @@ -59,7 +59,7 @@ my $TEXT = ""; my @families = $mw->fontFamilies; #print "families=@families\n"; -my $family=""; +my $family="courier"; if ( grep /^verdana$/i , @families) { $family = "verdana"; # $family = "helvetica"; |