X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=t%2F005_strict.t;h=8a8d634fdd1e7b1778fb813cbe180d158ed87698;hp=858437bde88fa2073b860647d91acee81ff24e41;hb=6ac028c4d869259041b7c526071cf614ffb033fa;hpb=a4b6dc0b8777eabd4ac8101095476bfa0e281a66

diff --git a/t/005_strict.t b/t/005_strict.t
index 858437b..8a8d634 100644
--- a/t/005_strict.t
+++ b/t/005_strict.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 9;
+use Test::More tests => 10;
 use Test::Exception;
 
 BEGIN {
@@ -99,3 +99,10 @@ BEGIN {
 
     throws_ok { App->new_with_options } qr/Unknown option: private_stuff/;
 }
+
+{
+    local @ARGV = (qw/--length 100/);
+
+    throws_ok { App->new_with_options } qr/Unknown option: length/;
+}
+