1 files changed, 0 insertions, 40 deletions
diff --git a/perl/perl-GD/no_ttf_test.diff b/perl/perl-GD/no_ttf_test.diff
deleted file mode 100644
index 409d15e789..0000000000
--- a/perl/perl-GD/no_ttf_test.diff
+++ /dev/null
@@ -1,40 +0,0 @@
-diff -Naur GD-2.56/t/GD.t GD-2.56.patched/t/GD.t
---- GD-2.56/t/GD.t	2014-10-27 21:34:54.000000000 -0400
-+++ GD-2.56.patched/t/GD.t	2016-08-21 18:24:24.469496848 -0400
-@@ -7,8 +7,8 @@
- use FindBin qw($Bin);
- use lib "$Bin/../blib/lib","$Bin/../blib/arch","$Bin/../lib";
- use constant FONT=>"$Bin/test_data/Generic.ttf";
--use constant IMAGE_TESTS => 7;
--use Test::More tests => 11;
-+use constant IMAGE_TESTS => 6;
-+use Test::More tests => 10;
- use IO::Dir;
- 
- use_ok('GD',':DEFAULT',':cmp');
-@@ -219,25 +219,6 @@
-     return $im;
- }
- 
--sub test7 {
--  my $im = GD::Image->new(400,250);
--  if (!$im) { printf("Test7: no image");};
--  my($white,$black,$red,$blue,$yellow) = 
--    (
--     $im->colorAllocate(255, 255, 255),
--     $im->colorAllocate(0, 0, 0),
--     $im->colorAllocate(255, 0, 0),
--     $im->colorAllocate(0,0,255),
--     $im->colorAllocate(255,250,205)
--    );
--
--  # Some TTFs
--  $im->stringFT($black,FONT,12.0,0.0,20,20,"Hello world!") || warn $@;
--  $im->stringFT($red,FONT,14.0,0.0,20,80,"Hello world!") || warn $@;
--  $im->stringFT($blue,FONT,30.0,-0.5,60,100,"Goodbye cruel world!") || warn $@;
--  return $im;
--}
--
- sub run_image_regression_tests {
-     my $suffix = $ENV{GDIMAGETYPE} || 'gd2';
-     print STDERR "# Testing using $suffix support.\n";