diff options
| author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-07-18 21:44:33 +0100 |
|---|---|---|
| committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-07-19 01:12:04 +0100 |
| commit | 33a4bc146f390fb3dc2d9521a079c77ed8f1780c (patch) | |
| tree | aaffffde27768909b93e1675dba6a6aef62c57a7 | |
| parent | 743c8017cb0444a55731b923699f3bea85e0d08e (diff) | |
Dgit.pm: in_workarea: Use changedir
This produces better debug output.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
| -rw-r--r-- | Debian/Dgit.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Debian/Dgit.pm b/Debian/Dgit.pm index e25a3af..399aaad 100644 --- a/Debian/Dgit.pm +++ b/Debian/Dgit.pm @@ -481,9 +481,9 @@ sub in_workarea ($;$) { # $twa should be relative paths of the form .git/FOO/BAR my ($twa) = @_; $twa //= $wa; - chdir $twa or die "$twa $!"; + changedir $twa or die "$twa $!"; my $r = eval { $sub->($twa); }; - chdir '../../..' or die "$@; $!"; + changedir '../../..' or die "$@; $!"; die $@ if length $@; return $r; } |