diff options
Diffstat (limited to 'test')
| -rwxr-xr-x | test/feh.i | 8 | ||||
| -rwxr-xr-x | test/run-interactive | 8 | 
2 files changed, 15 insertions, 1 deletions
| @@ -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} | 
