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 /scripts/dpkg-source.pl | |
| 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 'scripts/dpkg-source.pl')
| -rwxr-xr-x | scripts/dpkg-source.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/dpkg-source.pl b/scripts/dpkg-source.pl index 107408d79..6a4825d22 100755 --- a/scripts/dpkg-source.pl +++ b/scripts/dpkg-source.pl @@ -118,7 +118,7 @@ if (defined($options{opmode}) && } if ($dir eq '.') { # . is never correct, adjust automatically - $dir = basename(cwd()); + $dir = basename(getcwd()); chdir '..' or syserr(g_("unable to chdir to '%s'"), '..'); } # --format options are not allowed, they would take precedence |