Run X tests in Xnest. Kinda buggy so far, but still better than before

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}