[lintian] 01/03: coll/bin-pkg-control: Apply perltidy
This is an automated email from the git hooks/post-receive script.
nthykier pushed a commit to branch master
in repository lintian.
commit e31cd20f85ec568c46c937d70a9f691d48b26316
Author: Niels Thykier <niels@thykier.net>
Date: Mon Oct 13 15:55:49 2014 +0200
coll/bin-pkg-control: Apply perltidy
Signed-off-by: Niels Thykier <niels@thykier.net>
---
collection/bin-pkg-control | 14 ++++++--------
1 file changed, 6 insertions(+), 8 deletions(-)
diff --git a/collection/bin-pkg-control b/collection/bin-pkg-control
index 792998d..4e4373e 100755
--- a/collection/bin-pkg-control
+++ b/collection/bin-pkg-control
@@ -48,7 +48,6 @@ sub collect {
# The following calls use knowledge of the .deb format for speed
-
# (replaces dpkg-deb -e)
# extract control files' tarball
$in_fd = FileHandle->new;
@@ -57,8 +56,10 @@ sub collect {
['ar', 'p', "$dir/deb", 'control.tar.gz'],
'|', ['gzip', '-dc']);
- $job = { fail => 'error', err => "$dir/control-errors",
- pipe_in => FileHandle->new,
+ $job = {
+ fail => 'error',
+ err => "$dir/control-errors",
+ pipe_in => FileHandle->new,
};
push(@out_fds, $job->{'pipe_in'});
push(@jobs, $job);
@@ -81,8 +82,7 @@ sub collect {
push(@jobs, $job);
# create index of control.tar.gz
spawn(
- $job, ['tar', 'tvf', '-'],
- '|', ['sort', '-k', '6'],
+ $job, ['tar', 'tvf', '-'],'|', ['sort', '-k', '6'],
'|', ['gzip', '--best', '-c'],
);
@@ -90,9 +90,7 @@ sub collect {
for my $out_pipe (@out_fds) {
$out_pipe->blocking(1);
}
- eval {
- pipe_tee($in_fd, \@out_fds);
- };
+ eval {pipe_tee($in_fd, \@out_fds);};
$err = $@;
eval {
close($in_fd);
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/lintian/lintian.git
Reply to: