[debsums] 177/184: rdebsums: Whitespace cleanup
Axel Beckert
abe at deuxchevaux.org
Mon Mar 2 21:21:30 UTC 2015
This is an automated email from the git hooks/post-receive script.
abe pushed a commit to branch master
in repository debsums.
commit f3e81650b831dfa1568e68129a7f1051ea8ca2a4
Author: Axel Beckert <abe at deuxchevaux.org>
Date: Sat Feb 7 00:38:38 2015 +0100
rdebsums: Whitespace cleanup
---
debian/changelog | 2 ++
rdebsums | 15 +++++++--------
2 files changed, 9 insertions(+), 8 deletions(-)
diff --git a/debian/changelog b/debian/changelog
index 5ff3cd1..70c60a0 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -20,6 +20,8 @@ debsums (2.1~dev) UNRELEASED; urgency=medium
arch-qualified (multiarch) packages. (Closes: #773136)
* Remove mentioning of /etc/apt/apt.conf.d/90debsums from debsums(1).
(Closes: #737240)
+ * rdebsums:
+ + Whitespace cleanup
-- Axel Beckert <abe at debian.org> Fri, 06 Feb 2015 23:50:20 +0100
diff --git a/rdebsums b/rdebsums
index b8dc0c8..cdd66f8 100755
--- a/rdebsums
+++ b/rdebsums
@@ -2,24 +2,24 @@
# rdebsums: a wrapper around debsums to also check dependencies of a package
# Copyright 2007 by Vincent Fourmond <fourmond at debian.org>
-#
+#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
-#
+#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
-#
+#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
my $usage="rdebsums --help | --others [debsum options] package
-Runs debsums on package and all its dependencies.
+Runs debsums on package and all its dependencies.
\t--others\talso include Recommends and Suggests
";
@@ -31,7 +31,7 @@ if(grep(/^--others/, @ARGV)) {
@ARGV = grep(!/^--others/, @ARGV)
} else {
$others = 0;
-}
+}
if(! (scalar @ARGV) || grep(/^--help/, @ARGV) ) {
print $usage;
exit 1;
@@ -69,14 +69,13 @@ sub dependencies {
push @direct_children, $1;
}
}
-
+
$ignore->{$pack} = 1;
# Then, we add their dependencies
for my $subp (@direct_children) {
- dependencies($subp, $also_not_depends, $ignore) unless
+ dependencies($subp, $also_not_depends, $ignore) unless
$ignore->{$subp};
$ignore{$subp} = 1;
}
return (keys %{$ignore});
}
-
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/debsums.git
More information about the Pkg-perl-cvs-commits
mailing list