diff options
author | Daniel Friesel <derf@derf.homelinux.org> | 2010-06-16 18:56:59 +0200 |
---|---|---|
committer | Daniel Friesel <derf@derf.homelinux.org> | 2010-06-16 18:56:59 +0200 |
commit | ec5323982f0b3e6faa33e2210bb79578af5c7935 (patch) | |
tree | 3a7e663431d817d908afaab67ea78b87ff8b9f73 | |
parent | 3aa79f07f678e6752bfdef3cbbf43e08c93e8033 (diff) | |
download | feh-ec5323982f0b3e6faa33e2210bb79578af5c7935.zip |
Test all slideshow movement keys
-rwxr-xr-x | test/feh.i | 12 |
1 files changed, 9 insertions, 3 deletions
@@ -3,7 +3,7 @@ use strict; use warnings; use 5.010; -use Test::More tests => 12; +use Test::More tests => 15; use X11::GUITest qw/ FindWindowLike GetWindowName @@ -91,12 +91,18 @@ $win = feh_start(q{}, 'test/ok.png test/ok.jpg test/ok.gif'); test_win_title($win, 'feh [1 of 3] - test/ok.png'); SendKeys('{RIG}'); test_win_title($win, 'feh [2 of 3] - test/ok.jpg'); -SendKeys('{RIG}'); +SendKeys('n'); test_win_title($win, 'feh [3 of 3] - test/ok.gif'); -SendKeys('{RIG}'); +SendKeys('{SPA}'); test_win_title($win, 'feh [1 of 3] - test/ok.png'); SendKeys('{LEF}'); test_win_title($win, 'feh [3 of 3] - test/ok.gif'); +SendKeys('p'); +test_win_title($win, 'feh [2 of 3] - test/ok.jpg'); +SendKeys('{BAC}'); +test_win_title($win, 'feh [1 of 3] - test/ok.png'); +SendKeys('p'); +test_win_title($win, 'feh [3 of 3] - test/ok.gif'); SendKeys('{DEL}'); test_win_title($win, 'feh [1 of 2] - test/ok.png'); SendKeys('{DEL}'); |