From: Brandon L Black <blblack@gmail.com>
Date: Mon, 2 Apr 2007 21:33:08 +0000 (+0000)
Subject: small fixups (didnt make test before the last commit)
X-Git-Tag: 0_02~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bae0043998f6af157ea8a7dcd885fc032fe748d4;p=gitmo%2FMooseX-Getopt.git

small fixups (didnt make test before the last commit)
---

diff --git a/lib/MooseX/Getopt.pm b/lib/MooseX/Getopt.pm
index 7716f52..572be04 100644
--- a/lib/MooseX/Getopt.pm
+++ b/lib/MooseX/Getopt.pm
@@ -10,7 +10,7 @@ use MooseX::Getopt::Meta::Attribute;
 our $VERSION   = '0.01';
 our $AUTHORITY = 'cpan:STEVAN';
 
-has ARGV => (is => rw, isa => 'ArrayRef');
+has ARGV => (is => 'rw', isa => 'ArrayRef');
 
 sub new_with_options {
     my ($class, %params) = @_;
@@ -56,11 +56,11 @@ sub new_with_options {
     #warn Dumper \%options;
     
     $class->new(
+        ARGV => $saved_argv,
         %params, 
         map { 
             $name_to_init_arg{$_} => $options{$_} 
         } keys %options,
-        ARGV => $saved_argv;
     );
 }