aboutsummaryrefslogtreecommitdiff
path: root/lib/WebCoso/Maker.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/WebCoso/Maker.pm')
-rw-r--r--lib/WebCoso/Maker.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/WebCoso/Maker.pm b/lib/WebCoso/Maker.pm
index 1000c22..73fdbbb 100644
--- a/lib/WebCoso/Maker.pm
+++ b/lib/WebCoso/Maker.pm
@@ -11,6 +11,7 @@ use WebCoso::Common;
use WebCoso::TT;
use WebCoso::XSLT;
use WebCoso::ReST;
+use Log::Log4perl ':easy';
my $fc=File::Cache::Parsed->new(follow=>1);
$fc->add_parser(qr{\.ya?ml$} =>
@@ -24,20 +25,22 @@ my $rest=WebCoso::ReST->new(fc=>$fc);
sub parseRST {
my ($maker,$target,$deps,$matches)=@_;
+ DEBUG("parseRST($maker,$target,(@$deps),(@$matches))");
$fc->put($target,$fc->get($deps->[-1]));
}
sub getTags {
my ($maker,$target,$deps,$matches)=@_;
+ DEBUG("getTags($maker,$target,(@$deps),(@$matches))");
$fc->put($target,WebCoso::Common::getTags($fc,@$deps));
}
sub getChanges {
my ($maker,$target,$deps,$matches)=@_;
+ DEBUG("getChanges($maker,$target,(@$deps),(@$matches))");
- warn "changes: $target <- @$deps, @$matches\n";
open my $fh,'>',$target;
}