Add test for --recursive

use strict;

use warnings;

use 5.010;

use Test::Command tests => 60;

use Test::Command tests => 63;

$ENV{HOME} = 'test';

$cmd->stdout_is_file('test/list/format_reverse');

$cmd->stderr_like($re_warning);

$cmd = Test::Command->new(

	cmd => "$feh --list --recursive --sort filename test/ok"

);

$cmd->exit_is_num(0);

$cmd->stdout_is_file('test/list/filename_recursive');

$cmd->stderr_is_eq('');

$cmd = Test::Command->new(cmd => "$feh --customlist '%f; %h; %l; %m; %n; %p; "

                               . "%s; %t; %u; %w' $images");

NUM	FORMAT	WIDTH	HEIGHT	PIXELS	SIZE(bytes)	ALPHA	FILENAME

1	gif	16	16	256	953		-	test/ok/gif

2	jpeg	16	16	256	354		-	test/ok/jpg

3	png	16	16	256	403		X	test/ok/png

4	pnm	16	16	256	269		-	test/ok/pnm

5	png	16	16	256	403		X	test/ok/recursive/png

--recursive

 [ ] recurses into subdirectories

 [x] recurses into subdirectories

--reload