remove duplicate test

diff --git a/t/prototype.t b/t/prototype.t
index 35b6925..69b1c60 100644 (file)
--- a/t/prototype.t
+++ b/t/prototype.t
@@ -1,5 +1,5 @@
 #!perl
-use Test::More tests => 27;
+use Test::More tests => 24;
 
 use warnings FATAL => 'all';
 use strict;
@@ -9,9 +9,6 @@ use Function::Parameters;
 is eval 'fun :([) {}', undef;
 like $@, qr/Illegal character in prototype/;
 
-is eval 'fun :([) {}', undef;
-like $@, qr/Illegal character in prototype/;
-
 is eval 'fun :(][[[[[[) {}', undef;
 like $@, qr/Illegal character in prototype/;
 
@@ -37,7 +34,6 @@ like $@, qr/Illegal character after '\\' in prototype/;
        no warnings qw(illegalproto);
 
        ok eval 'fun :([) {}';
-       ok eval 'fun :([) {}';
        ok eval 'fun :(][[[[[[) {}';
        ok eval 'fun :(\;) {}';
        ok eval 'fun :(\[_;@]) {}';