Commit 2da60818 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Add tests for windowsize and --screen-clip

parent 095f8a48

test/feh.i

+16 −1
Original line number Diff line number Diff line
@@ -4,7 +4,7 @@ use warnings; 
use 5.010;



use Cwd;

use Test::More tests => 65;

use Test::More tests => 67;

use Time::HiRes qw/sleep/;

use X11::GUITest qw/:ALL/;
@@ -309,3 +309,18 @@ SKIP: { 
		'w key resizes correctly');

}

feh_stop();



$win = feh_start(q{}, 'test/huge.png');

ok(waitfor {

		   (GetWindowPos($win))[2] == (GetScreenRes())[0]

		|| (GetWindowPos($win))[3] == (GetScreenRes())[1]

	},

	'Large window limited to screen size');

feh_stop();



$win = feh_start('--screen-clip 0', 'test/huge.png');

ok(waitfor {

		[(GetWindowPos($win))[2, 3]] ~~ [4000, 3000]

	},

	'disabled screen clip');

feh_stop();

test/huge.png

0 → 100644
+146 KiB
Loading image diff...