[debsums] 03/07: Add check for -s option
Axel Beckert
abe at deuxchevaux.org
Thu Mar 26 01:30:26 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 d81ceacc28a8f90fca280becf99ed2de38ebcd7c
Author: Axel Beckert <abe at deuxchevaux.org>
Date: Thu Mar 26 02:15:07 2015 +0100
Add check for -s option
---
t/debsums.t | 16 +++++++++++++++-
1 file changed, 15 insertions(+), 1 deletion(-)
diff --git a/t/debsums.t b/t/debsums.t
index d2372f9..604e0a8 100644
--- a/t/debsums.t
+++ b/t/debsums.t
@@ -38,6 +38,12 @@ EOT
$expected = remove_failed($expected)
if $state eq 'clean';
+ my $expected_s = <<"EOT";
+debsums: changed file $chroot/usr/share/doc/fakepkg/README (from fakepkg package)
+EOT
+ $expected_s = remove_failed($expected_s)
+ if $state eq 'clean';
+
my $expected_conffiles = <<"EOT";
$chroot/etc/fakepkg.cfg OK
$chroot/etc/fakepkg-broken.cfg FAILED
@@ -70,6 +76,14 @@ EOT
'STDOUT as expected');
expected_rc($exit_code);
+ # Test option -s
+ run(@command, '-s');
+ is(stderr,
+ $state eq 'clean' ? '' : $expected_s,
+ 'STDERR as expected');
+ is(stdout, '', 'STDOUT is empty');
+ expected_rc($exit_code);
+
# Test option -e
run(@command, '-e');
is(stderr, '', 'STDERR is empty');
@@ -103,7 +117,7 @@ sub sort_lines {
sub remove_failed {
my $string = shift;
return join("\n",
- grep { !/FAILED/ }
+ grep { !/FAILED|^debsums: changed file/ }
split("\n", $string))
. trailing_line_break_if_present($string);
}
--
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