1#!@PERL@
2
3use strict;
4use Test::More tests => 2;
5use SysWrap;
6
7mkdir("@TEST@/support/files/a") unless -d "@TEST@/support/files/a";
8execute("cp @TEMP@/a/1 @TEMP@/a/2 @TEST@/support/files/a/");
9
10ok(0 != rsnapshot("-c @TEST@/rsync-exitcode/conf/rsync-exitcode-bad.conf hourly"));
11ok(0 == rsnapshot("-c @TEST@/rsync-exitcode/conf/rsync-exitcode-good.conf hourly"));
12
13execute("rm -f @TEST@/support/files/a/1 @TEST@support/files/a/2");
14