[debsums] 05/07: Add check for -l option

[Axel Beckert]

This is an automated email from the git hooks/post-receive script.

abe pushed a commit to branch master
in repository debsums.

commit 8368a5399156e615832a6a328a08e0b5cf7d24f5
Author: Axel Beckert <abe at deuxchevaux.org>
Date:   Thu Mar 26 02:24:57 2015 +0100

    Add check for -l option
---
 t/debsums.t | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/t/debsums.t b/t/debsums.t
index c20658c..7cf7778 100644
--- a/t/debsums.t
+++ b/t/debsums.t
@@ -104,12 +104,23 @@ EOT
     }
 }
 
-# Check for handling of missing md5sums files
-run($command, "--root=t/fakechroots/lossy");
+################################################
+# Checks for handling of missing md5sums files #
+################################################
+
+# Expect a warning
+ at command = ($command, "--root=t/fakechroots/lossy");
+run(@command);
 is(stderr, "debsums: no md5sums for fakepkg\n", 'Warning on STDERR');
 is(stdout, '', 'STDOUT is empty');
 expected_rc(0);
 
+# Explicitly list packages
+run(@command, '-l');
+is(stderr, '', 'STDERR is empty');
+is(stdout, "fakepkg\n", 'Affected package listed');
+expected_rc(0);
+
 done_testing();
 
 sub sort_lines {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/debsums.git