X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F108_usage_attr.t;h=3fd6c4da0a46c5b8c76508ae80a867c1e61f0cf9;hb=0cdc0384ddb0c3be31312270a986ef74c77db300;hp=c0286c5fe9d5947dcc8d5a55219c6acfb2198511;hpb=81b19ed83c9e345f960ccefbcd639dd0e3c2de06;p=gitmo%2FMooseX-Getopt.git

diff --git a/t/108_usage_attr.t b/t/108_usage_attr.t
index c0286c5..3fd6c4d 100644
--- a/t/108_usage_attr.t
+++ b/t/108_usage_attr.t
@@ -1,12 +1,11 @@
-#!/usr/bin/env perl
-
 # Re RT#58715 and the claim in the documentation:
 #   If you have Getopt::Long::Descriptive the usage param is also passed to new.
 
 # This tests the fix (that fulfills the documentation claim).
 
 use strict; use warnings;
-use Test::More tests => 3;
+use Test::More tests => 4;
+use Test::NoWarnings 1.04 ':early';
 
 {
     package MyClass;