From 6fc29fbe6bf95c196d749c8ba8973bbafdba0667 Mon Sep 17 00:00:00 2001
From: mertz
Date: Tue, 21 Jun 2005 21:14:34 +0000
Subject: This test may fail on some host, when neither verdana, helvetica,
 arial fonts were found. Using now a default courier font

---
 Perl/t/Text2.t | 4 ++--
 1 file 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";
-- 
cgit v1.1