]> git.imager.perl.org - imager.git/commitdiff
report the error if we can't load the MM font
authorTony Cook <tony@develop=help.com>
Fri, 12 Nov 2010 23:28:02 +0000 (23:28 +0000)
committerTony Cook <tony@develop=help.com>
Fri, 12 Nov 2010 23:28:02 +0000 (23:28 +0000)
FT2/t/t10ft2.t

index e8546ebb1c060b07f86ad5494043ebb7fb3ed207..5149571651804a7ed7bfb2b9f847f3db4f3d1602 100644 (file)
@@ -344,7 +344,8 @@ SKIP:
   print "# Try a multiple master font\n";
   my $mmfont = Imager::Font->new(file=>"fontfiles/MMOne.pfb", type=>"ft2", 
                                  color=>"white", aa=>1, size=>60);
-  ok($mmfont, "loaded MM font");
+  ok($mmfont, "loaded MM font")
+    or print "# ", Imager->errstr, "\n";
   ok($mmfont->is_mm, "font is multiple master");
   my @axes = $mmfont->mm_axes;
   is(@axes, 2, "check we got both axes");