From: Steven Schubiger <stsc@refcnt.org>
Date: Wed, 11 Jun 2014 12:55:04 +0000 (+0200)
Subject: Check exit value for displaying version data
X-Git-Tag: v0.55~14
X-Git-Url: http://git.refcnt.org/?p=colorize.git;a=commitdiff_plain;h=055b7ca1312376f2fdf214176a1ae782d05f5396

Check exit value for displaying version data
---

diff --git a/test.pl b/test.pl
index 8d8b592..27f7a67 100755
--- a/test.pl
+++ b/test.pl
@@ -10,7 +10,7 @@ use IPC::Open3 qw(open3);
 use Symbol qw(gensym);
 use Test::More;
 
-my $tests = 23;
+my $tests = 24;
 
 my %BUF_SIZE = (
    normal => 1024,
@@ -42,7 +42,8 @@ SKIP: {
     my $program = tmpnam();
     skip 'compiling failed (normal)', $tests unless system("gcc -DTEST -DBUF_SIZE=$BUF_SIZE{normal} -o $program $source") == 0;
 
-    is(system("$program --help >/dev/null 2>&1"), 0, 'exit value for help screen');
+    is(system("$program --help >/dev/null 2>&1"),    0, 'exit value for help screen');
+    is(system("$program --version >/dev/null 2>&1"), 0, 'exit value for version data');
 
     my $run_program_fail = sub
     {