From 6166ca288a6217311887adeaf233da1d22c600bd Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 25 Jan 2011 19:05:02 +0100 Subject: Add --action tests + hold-action --- test/feh.i | 20 +++++++++++++++++++- 1 file changed, 19 insertions(+), 1 deletion(-) diff --git a/test/feh.i b/test/feh.i index ad42732..d1a2d66 100755 --- a/test/feh.i +++ b/test/feh.i @@ -4,7 +4,7 @@ use warnings; use 5.010; use Cwd; -use Test::More tests => 75; +use Test::More tests => 82; use Time::HiRes qw/sleep/; use X11::GUITest qw/:ALL/; @@ -187,6 +187,24 @@ sleep(0.8); test_win_title($win, 'feh [2 of 3] - test/ok/gif'); feh_stop(); +$win = feh_start( + '--action3 ";echo foo" --action7 "echo foo" ' . + '--action8 ";touch feh_test_%u_%l" --action9 "rm feh_test_%u_%l"', + 'test/ok/png test/ok/gif test/ok/jpg' +); +test_win_title($win, 'feh [1 of 3] - test/ok/png'); +SendKeys('3'); +test_win_title($win, 'feh [1 of 3] - test/ok/png'); +SendKeys('7'); +test_win_title($win, 'feh [2 of 3] - test/ok/gif'); +SendKeys('8'); +test_win_title($win, 'feh [2 of 3] - test/ok/gif'); +ok(-e 'feh_test_2_3', 'feh action created file with correct format specifiers'); +SendKeys('9'); +ok(waitfor { not -e 'feh_test_2_3' }, 'feh action removed file'); +test_win_title($win, 'feh [3 of 3] - test/ok/jpg'); +feh_stop(); + $win = feh_start(q{}, 'test/ok/png ' x 100); test_win_title($win, 'feh [1 of 100] - test/ok/png'); SendKeys('{PGD}'); -- cgit v1.2.3