summaryrefslogtreecommitdiff
path: root/test/feh.t
diff options
context:
space:
mode:
Diffstat (limited to 'test/feh.t')
-rw-r--r--test/feh.t20
1 files changed, 18 insertions, 2 deletions
diff --git a/test/feh.t b/test/feh.t
index 8f415f3..e530087 100644
--- a/test/feh.t
+++ b/test/feh.t
@@ -10,6 +10,7 @@ my $feh = "src/feh";
my $images_ok = 'test/ok/gif test/ok/jpg test/ok/png test/ok/pnm';
my $images_fail = 'test/fail/gif test/fail/jpg test/fail/png test/fail/pnm';
my $images = "${images_ok} ${images_fail}";
+my $has_help = 0;
my $feh_name = $ENV{'PACKAGE'};
@@ -33,6 +34,11 @@ if (length($feh_name) == 0) {
die($err_no_env);
}
+my $version = qx{$feh --version};
+if ($version =~ m{ Compile-time \s switches : \s .* help }ox) {
+ $has_help = 1;
+}
+
my $re_warning =
qr{${feh_name} WARNING: test/fail/... \- No Imlib2 loader for that file format\n};
my $re_loadable = qr{test/ok/...};
@@ -139,13 +145,23 @@ $cmd = Test::Command->new(cmd => "$feh --list --min-dimension 20x20 $images_ok")
$cmd->exit_is_num(1);
$cmd->stdout_is_eq('');
-$cmd->stderr_is_file('test/no-loadable-files');
+if ($has_help) {
+ $cmd->stderr_is_file('test/no-loadable-files.help');
+}
+else {
+ $cmd->stderr_is_file('test/no-loadable-files');
+}
$cmd = Test::Command->new(cmd => "$feh --list --max-dimension 10x10 $images_ok");
$cmd->exit_is_num(1);
$cmd->stdout_is_eq('');
-$cmd->stderr_is_file('test/no-loadable-files');
+if ($has_help) {
+ $cmd->stderr_is_file('test/no-loadable-files.help');
+}
+else {
+ $cmd->stderr_is_file('test/no-loadable-files');
+}
$cmd = Test::Command->new(cmd => "$feh --list --min-dimension 16x16 $images_ok");