1 files changed, 17 insertions, 2 deletions
diff --git a/t/run.t b/t/run.t
index fa435aa..7f0b24b 100755
--- a/t/run.t
+++ b/t/run.t
@@ -5,14 +5,29 @@ use strict;
 use warnings;
 
 use IPC::Run qw/run/;
-use Test::More tests => 54;
+use Test::More;
 use FindBin qw/$Bin/;
 use File::Temp qw/tempdir/;
 
+my @programs = qw/
+    clean_files
+    compress_files
+    relink_symlinks
+    gprintify
+    translate_menu
+    remove_info_dir
+    fix_pamd
+    fix_eol
+    check_elf_files
+    check_desktop_files
+/;
+
+plan tests => @programs * 6;
+
 my ($out, $err);
 delete $ENV{RPM_BUILD_ROOT};
 
-foreach my $prog (qw/clean_files compress_files relink_symlinks gprintify translate_menu remove_info_dir fix_pamd fix_eol check_elf_files/) {
+foreach my $prog (@programs) {
 
     ($out, $err) = run_prog($prog);
     is(  $out, '',                         "$prog stdin without buildroot" );