use Test::More tests=>13;
eval {
require Test::NoWarnings;
Test::NoWarnings->import();
1;
} or do {
SKIP: {
skip "Test::NoWarnings is not installed", 1;
fail "This shouldn't really happen at all";
};
};
chdir "t";
no warnings;
require Dtest;
use warnings;
use strict;
$Dotiac::DTL::ALLOWED_INCLUDE_ROOTS=1;
dtest("tag_ssi.html","AB\nACA\nB\nA\n",{var1=>B=>var2=>C=>inc_name=>"inc_more.html",inc_object=>"inc_var.html"});
dtest("tag_ssi_static.html","A{{ var1 }}\nA{{ var2 }}A\n{{ var1 }}\nA\n",{var1=>B=>var2=>C=>inc_name=>"inc_more.html",inc_object=>"inc_var.html"});
my $inc=Dotiac::DTL->new("inc_var.html");
$Dotiac::DTL::ALLOWED_INCLUDE_ROOTS=0;