diff options
| author | Josh Triplett <josh@joshtriplett.org> | 2018-09-15 16:10:29 -0700 |
|---|---|---|
| committer | Guillem Jover <guillem@debian.org> | 2018-09-18 23:43:37 +0200 |
| commit | 2848db123e1452d2c71840b7c00ca198c3626d4e (patch) | |
| tree | 88e5988ce485cb954dd43d80328c4f2f21a92143 /lib | |
| parent | a7901786002cf4bd9f1dfbf3e4d844fc27478a8b (diff) | |
| download | dpkg-2848db123e1452d2c71840b7c00ca198c3626d4e.tar.gz | |
perl: Replace all calls to Cwd::cwd with Cwd::getcwd
The former calls /bin/pwd, while the latter uses the getcwd() syscall
directly.
Signed-off-by: Guillem Jover <guillem@debian.org>
Diffstat (limited to 'lib')
| -rwxr-xr-x | lib/dpkg/t/t-tarextract.t | 2 | ||||
| -rwxr-xr-x | lib/dpkg/t/t-treewalk.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/dpkg/t/t-tarextract.t b/lib/dpkg/t/t-tarextract.t index 25916bb8d..5fb9afa09 100755 --- a/lib/dpkg/t/t-tarextract.t +++ b/lib/dpkg/t/t-tarextract.t @@ -119,7 +119,7 @@ TAR make_path($tmpdir); - my $cwd = cwd(); + my $cwd = getcwd(); # Check generated tarballs. foreach my $type (qw(v7 ustar oldgnu gnu)) { diff --git a/lib/dpkg/t/t-treewalk.t b/lib/dpkg/t/t-treewalk.t index dcde7901e..6f379c81b 100755 --- a/lib/dpkg/t/t-treewalk.t +++ b/lib/dpkg/t/t-treewalk.t @@ -45,7 +45,7 @@ sub make_file { # Populate the tree hierarchy. sub make_tree { my ($dirtree) = @_; - my $cwd = cwd(); + my $cwd = getcwd(); make_path($dirtree); chdir $dirtree; |