X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F004_nogetop.t;h=118f18ad3e06a92c03b2a31c5828ec506b10af96;hb=986fb4690bc00c860b1f728b986e39b412100854;hp=a69310fc53984d888d63b233dc3bda7c555ef775;hpb=7d634446ce2bc72bafb0dd56d016889b98a9314f;p=gitmo%2FMooseX-Getopt.git

diff --git a/t/004_nogetop.t b/t/004_nogetop.t
index a69310f..118f18a 100644
--- a/t/004_nogetop.t
+++ b/t/004_nogetop.t
@@ -1,10 +1,9 @@
-#!/usr/bin/perl
-
 use strict;
-use warnings;
+use warnings FATAL => 'all';
 
-use Test::More tests => 9;
+use Test::More tests => 10;
 use Test::Fatal 0.003;
+use Test::Warnings;
 
 BEGIN {
     use_ok('MooseX::Getopt');
@@ -17,7 +16,7 @@ BEGIN {
     with 'MooseX::Getopt';
 
     has 'data' => (
-        metaclass => 'Getopt',
+        traits    => ['Getopt'],
         is        => 'ro',
         isa       => 'Str',
         default   => 'file.dat',
@@ -25,7 +24,7 @@ BEGIN {
     );
 
     has 'cow' => (
-        metaclass   => 'Getopt',
+        traits      => ['Getopt'],
         is          => 'ro',
         isa         => 'Str',
         default     => 'moo',
@@ -33,7 +32,7 @@ BEGIN {
     );
 
     has 'horse' => (
-        metaclass   => 'Getopt',
+        traits      => ['Getopt'],
         is          => 'ro',
         isa         => 'Str',
         default     => 'bray',
@@ -65,20 +64,19 @@ BEGIN {
     );
 
     has 'private_stuff' => (
-        metaclass => 'NoGetopt',
+        traits   => ['NoGetopt'],
         is       => 'ro',
         isa      => 'Int',
         default  => 713
     );
 
     has '_private_stuff_cmdline' => (
-        metaclass => 'Getopt',
+        traits    => ['Getopt'],
         is        => 'ro',
         isa       => 'Int',
         default   => 832,
         cmd_flag  => 'p',
     );
-
 }
 
 {