X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FGitalist.git;a=blobdiff_plain;f=lib%2FGitalist%2FTraitFor%2FScript.pm;h=73e31b3810709ea3b75e76d9952935da5c24c9fb;hp=17ad1f90bffb427777fb6941dfbe04ea4343a78f;hb=6537d25ec02932c27e2c86381e65980fd0a00cac;hpb=a46cb1523933154490ffbb8d1b28dcda57568801 diff --git a/lib/Gitalist/TraitFor/Script.pm b/lib/Gitalist/TraitFor/Script.pm index 17ad1f9..73e31b3 100644 --- a/lib/Gitalist/TraitFor/Script.pm +++ b/lib/Gitalist/TraitFor/Script.pm @@ -13,6 +13,14 @@ has repo_dir => ( }, ); +around run => sub { + my $orig = shift; + my $self = shift; + warn("Script repo dir" . $self->repo_dir); + local $ENV{GITALIST_REPO_DIR} = $self->repo_dir; + $self->$orig(@_); +}; + 1; =head1 NAME