enable the debug log for the standard font tests
authorTony Cook <tony@develop-help.com>
Wed, 3 Apr 2013 12:28:37 +0000 (23:28 +1100)
committerTony Cook <tony@develop-help.com>
Wed, 3 Apr 2013 12:30:37 +0000 (23:30 +1100)
FT2/Changes
FT2/t/t90std.t
T1/Changes
T1/T1.pm
T1/t/t90std.t
t/t37std.t

index 63c27bb..d61256f 100644 (file)
@@ -3,6 +3,8 @@ Imager-Font-FT2 0.90
 
  - fix some mismatched format strings/types
 
+ - enable the debug log for t/t90std.t
+
 Imager-Font-FT2 0.89
 ====================
 
index 9368ca7..19a40a9 100644 (file)
@@ -4,6 +4,8 @@ use Imager::Test qw(std_font_tests std_font_test_count);
 use Imager::Font;
 use Test::More tests => std_font_test_count();
 
+Imager->open_log(log => "testout/t90std.log");
+
 my $font = Imager::Font->new(file => "fontfiles/dodge.ttf",
                             type => "ft2");
 my $name_font =
@@ -23,3 +25,5 @@ SKIP:
       glyph_names => [ "A", "uni2010", "A" ],
      });
 }
+
+Imager->close_log;
index 92870d8..691d621 100644 (file)
@@ -1,3 +1,8 @@
+Imager::Font::T1 1.020
+======================
+
+ - enable the debug log for t/t90std.t
+
 Imager::Font::T1 1.020
 ======================
 
index 6032265..42f3fa0 100644 (file)
--- a/T1/T1.pm
+++ b/T1/T1.pm
@@ -6,7 +6,7 @@ use vars qw(@ISA $VERSION);
 use Scalar::Util ();
 
 BEGIN {
-  $VERSION = "1.020";
+  $VERSION = "1.021";
 
   require XSLoader;
   XSLoader::load('Imager::Font::T1', $VERSION);
index a10fb14..47fe4ab 100644 (file)
@@ -4,6 +4,8 @@ use Imager::Test qw(std_font_tests std_font_test_count);
 use Imager::Font;
 use Test::More tests => std_font_test_count();
 
+Imager->open_log(log => "testout/t90std.log");
+
 my $font = Imager::Font->new(file => "fontfiles/dcr10.pfb",
                             type => "t1");
 
@@ -14,3 +16,5 @@ SKIP:
   std_font_tests({ font => $font,
                   has_chars => [ 1, '', 1 ]});
 }
+
+Imager->close_log;
index 8a638f1..73e28f5 100644 (file)
@@ -7,6 +7,8 @@ use Test::More;
 $Imager::formats{tt}
        or plan skip_all => "No tt available";
 
+Imager->open_log(log => "testout/t37std.log");
+
 plan tests => std_font_test_count();
 
 my $font = Imager::Font->new(file => "fontfiles/dodge.ttf",
@@ -27,3 +29,5 @@ SKIP:
       glyph_names => [ qw(A uni2010 A) ],
      });
 }
+
+Imager->close_log;