From 041833b7126ce4dbfb88fe2f7325e55eedbb8ee2 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 30 Nov 2010 21:51:57 +0100 Subject: Add regression test for invalid image segfault issue --- test/feh.i | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/test/feh.i b/test/feh.i index b45952e..ffa9c5a 100755 --- a/test/feh.i +++ b/test/feh.i @@ -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'); -- cgit v1.2.3