summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rwxr-xr-xtest/feh.i8
-rwxr-xr-xtest/run-interactive8
2 files changed, 15 insertions, 1 deletions
diff --git a/test/feh.i b/test/feh.i
index d08eb72..6e00f88 100755
--- a/test/feh.i
+++ b/test/feh.i
@@ -7,8 +7,9 @@ use Test::More tests => 30;
use X11::GUITest qw/
FindWindowLike
GetWindowName
- StartApp
+ SetInputFocus
SendKeys
+ StartApp
WaitWindowViewable
/;
@@ -28,6 +29,10 @@ sub feh_start {
BAIL_OUT("Unable to start feh ${opts} ${files}");
}
+ if (not SetInputFocus($id)) {
+ BAIL_OUT("Unable to focus window");
+ }
+
return $id;
}
@@ -126,6 +131,7 @@ $win = feh_start('--cycle-once --slideshow-delay -0.01',
sleep(0.1);
test_win_title($win, 'feh [1 of 3] - test/ok.png');
SendKeys('h');
+sleep(1);
test_no_win('cycle-once + negative delay + [h]');
$win = feh_start(q{}, 'test/ok.png test/ok.gif test/ok.gif test/ok.jpg');
diff --git a/test/run-interactive b/test/run-interactive
new file mode 100755
index 0000000..d86c09c
--- /dev/null
+++ b/test/run-interactive
@@ -0,0 +1,8 @@
+#!/bin/sh
+
+Xnest :1 &
+pid=${!}
+
+DISPLAY=:1 prove test/feh.i
+
+kill ${pid}