diff options
author | Niels Thykier <niels@thykier.net> | 2019-05-17 19:32:34 +0000 |
---|---|---|
committer | Niels Thykier <niels@thykier.net> | 2019-05-17 19:32:34 +0000 |
commit | 03567db0b5dd21faad13918f1aeb38625eb6d619 (patch) | |
tree | 352aa0b5b059db8db308de9cd1f93a158e9845f8 /lib/Debian | |
parent | 76bae79ebfab8d4d0b21a5a2170024aae1083b3f (diff) | |
download | debhelper-03567db0b5dd21faad13918f1aeb38625eb6d619.tar.gz |
Drop some obsolete/unused code
Signed-off-by: Niels Thykier <niels@thykier.net>
Diffstat (limited to 'lib/Debian')
-rw-r--r-- | lib/Debian/Debhelper/Buildsystem.pm | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/lib/Debian/Debhelper/Buildsystem.pm b/lib/Debian/Debhelper/Buildsystem.pm index 15d04db9..2463fb35 100644 --- a/lib/Debian/Debhelper/Buildsystem.pm +++ b/lib/Debian/Debhelper/Buildsystem.pm @@ -428,30 +428,6 @@ sub check_auto_buildable_clean_oos_buildir { return 1; } -sub _cd { - my ($this, $dir)=@_; - verbose_print("cd $dir"); - if (! $dh{NO_ACT}) { - chdir $dir or error("error: unable to chdir to $dir"); - } -} - -sub _in_dir { - my ($this, $dir, $code, @args) = @_; - if ($dir ne '.') { - my $ret; - $this->_cd($dir); - eval { - $ret = $code->(@args); - }; - my $saved_exception = $@; - $this->_cd($this->_rel2rel($this->{cwd}, $dir)); - die $saved_exception if $saved_exception; - return $ret; - } - return $code->(@args); -} - sub _generic_doit_in_dir { my ($this, $dir, $sub, @args) = @_; my %args; |