FS action bugfixes
Matt S Trout [Mon, 24 Feb 2014 07:49:17 +0000 (07:49 +0000)]
lib/DX/Lib/FS/Action/RewriteFile.pm
lib/DX/Lib/FS/Action/SetPathMode.pm

index 9b1b4fb..625f2df 100644 (file)
@@ -27,7 +27,7 @@ sub but_add {
 }
 
 sub but_remove {
-  $_[0]->but(remove_lines => [ %{$_[0]->remove_lines}, $_[1] => 1 ]);
+  $_[0]->but(remove_lines => { %{$_[0]->remove_lines}, $_[1] => 1 });
 }
 
 sub expected_effect {
index 6366d49..0753e9b 100644 (file)
@@ -2,7 +2,7 @@ package DX::Lib::FS::Action::SetPathMode;
 
 use Moo;
 
-has path_status => (is => 'ro', required => 1);
+has path_status => (is => 'ro', required => 1, handles => [ 'path' ]);
 has mode => (is => 'ro', required => 1);
 
 with 'DX::Role::Action';