X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F005_strict.t;h=206cb64852ad1efc7c47effa5b97ee997685708d;hb=config_from_file_cli;hp=096ace939ab89b487ef91fb8aeb3bf46ef4faf3d;hpb=bff3807bb402a84be10c48d2e4d1be0628fde911;p=gitmo%2FMooseX-Getopt.git

diff --git a/t/005_strict.t b/t/005_strict.t
index 096ace9..206cb64 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 {
@@ -18,7 +18,7 @@ BEGIN {
     with 'MooseX::Getopt::Strict';
 
     has 'data' => (
-        metaclass => 'MooseX::Getopt::Meta::Attribute',
+        metaclass => 'Getopt',
         is        => 'ro',
         isa       => 'Str',
         default   => 'file.dat',
@@ -34,7 +34,7 @@ BEGIN {
     );
 
     has 'horse' => (
-        metaclass   => 'MooseX::Getopt::Meta::Attribute',
+        metaclass   => 'Getopt',
         is          => 'ro',
         isa         => 'Str',
         default     => 'bray',
@@ -70,14 +70,6 @@ BEGIN {
         isa      => 'Int',
         default  => 713
     );
-
-    has '_private_stuff_cmdline' => (
-        is        => 'ro',
-        isa       => 'Int',
-        default   => 832,
-        cmd_flag  => 'p',
-    );
-
 }
 
 {
@@ -99,3 +91,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/;
+}
+