From: Matt S Trout <mst@shadowcat.co.uk>
Date: Mon, 24 Feb 2014 07:49:17 +0000 (+0000)
Subject: FS action bugfixes
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8773d7de52b850d2d59f9cf3225361e850410c2a;p=scpubgit%2FDKit.git

FS action bugfixes
---

diff --git a/lib/DX/Lib/FS/Action/RewriteFile.pm b/lib/DX/Lib/FS/Action/RewriteFile.pm
index 9b1b4fb..625f2df 100644
--- a/lib/DX/Lib/FS/Action/RewriteFile.pm
+++ b/lib/DX/Lib/FS/Action/RewriteFile.pm
@@ -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 {
diff --git a/lib/DX/Lib/FS/Action/SetPathMode.pm b/lib/DX/Lib/FS/Action/SetPathMode.pm
index 6366d49..0753e9b 100644
--- a/lib/DX/Lib/FS/Action/SetPathMode.pm
+++ b/lib/DX/Lib/FS/Action/SetPathMode.pm
@@ -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';