Commit 095f8a48 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Add test for --title

parent c2c3d5e4
Loading
Loading
Loading
Loading
+2 −1
Original line number Diff line number Diff line
@@ -349,7 +349,8 @@ Set
for windows opened from thumbnail mode.  See also
.Sx FORMAT SPECIFIERS .
.It Cm -^ , --title Ar title
Set window title for slideshow mode.
Set window title for slideshow mode.  See
.Sx FORMAT SPECIFIERS
.It Cm -u , --unloadable
Don't display images.  Just print out their names if imlib2 can NOT
successfully load them.
+8 −1
Original line number Diff line number Diff line
@@ -4,7 +4,7 @@ use warnings;
use 5.010;

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

@@ -127,6 +127,13 @@ test_win_title($win, 'feh [1 of 1] - test/ok.jpg');
SendKeys('{DEL}');
test_no_win("Removed all images from slideshow");

$win = feh_start('--title \'feh %m %u/%l %n\'',
	'test/ok.png test/ok.jpg test/ok.gif');
test_win_title($win, 'feh slideshow 1/3 ok.png');
SendKeys('{RIG}');
test_win_title($win, 'feh slideshow 2/3 ok.jpg');
feh_stop();

feh_start('--cycle-once', 'test/ok.png test/ok.jpg');
for (1 .. 2) {
	SendKeys('{RIG}');