### ----------------------------------------------------
### -- Pod::From::Cache
### -- Licenses: Artistic-2.0
### -- Authors: Richard Hainsworth, aka finanalyst
### -- File: xt/70-un-renewed-files.rakutest
### ----------------------------------------------------
use Test;
use File::Directory::Tree;

constant CACHE = 'xt/cache';
constant DOC = 'xt/doctest';

use Pod::From::Cache;
my $fn = DOC ~ '/.ignore-cache';

rmtree CACHE;
my Pod::From::Cache $cache .= new( :doc-source( DOC ), :cache-path( CACHE ));

$cache .= new( :doc-source( DOC ), :cache-path( CACHE ));
nok $cache.list-changed-files, 'no files have changed';
$fn.IO.unlink;
rmtree CACHE;

done-testing;


