Commit 041833b7 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Add regression test for invalid image segfault issue

parent 1a9ce0bf

test/feh.i

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



use Cwd;

use Test::More tests => 71;

use Test::More tests => 75;

use Time::HiRes qw/sleep/;

use X11::GUITest qw/:ALL/;
@@ -299,6 +299,16 @@ ok([(GetWindowPos($win))[2, 3]] ~~ [GetScreenRes()], 
	'fullscreen uses full screen size');

feh_stop();



$win = feh_start(q{}, 'test/ok/png ' . 'test/fail/png ' x 7 . 'test/ok/gif');

test_win_title($win, 'feh [1 of 9] - test/ok/png');

SendKeys('{RIG}');

test_win_title($win, 'feh [2 of 2] - test/ok/gif');

SendKeys('{LEF}');

test_win_title($win, 'feh [1 of 2] - test/ok/png');

SendKeys('{LEF}');

test_win_title($win, 'feh [2 of 2] - test/ok/gif');

feh_stop();



$win = feh_start();

(undef, undef, $width, $height) = GetWindowPos($win);

is($width, 16, 'correct default window width');