Commit 7920f39e authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Add test for --full-screen

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

use Cwd;
use Test::More tests => 70;
use Test::More tests => 71;
use Time::HiRes qw/sleep/;
use X11::GUITest qw/:ALL/;

@@ -296,6 +296,12 @@ is($width, 423, '--geometry: correct width');
is($height, 232, '--geometry: correct height');
feh_stop();

$win = feh_start('--full-screen');
(undef, undef, $width, $height) = GetWindowPos($win);
ok([(GetWindowPos($win))[2, 3]] ~~ [GetScreenRes()],
	'fullscreen uses full screen size');
feh_stop();

$win = feh_start();
(undef, undef, $width, $height) = GetWindowPos($win);
is($width, 16, 'correct default window width');