diff options
author | dakkar <dakkar@thenautilus.net> | 2015-09-10 16:06:30 +0100 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2015-09-10 16:06:30 +0100 |
commit | 5e4dc0ab78c6a312fc84c264f93bc8fd901f8c13 (patch) | |
tree | f7b2663d1d7b9fd394062915a6638858b22b938a | |
parent | minor fix in test lib (diff) | |
download | WebCoso-p6-5e4dc0ab78c6a312fc84c264f93bc8fd901f8c13.tar.gz WebCoso-p6-5e4dc0ab78c6a312fc84c264f93bc8fd901f8c13.tar.bz2 WebCoso-p6-5e4dc0ab78c6a312fc84c264f93bc8fd901f8c13.zip |
fix deps out-of-date comparison
-rw-r--r-- | lib/WebCoso/Maker.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/WebCoso/Maker.pm b/lib/WebCoso/Maker.pm index b64c9cf..02e1a18 100644 --- a/lib/WebCoso/Maker.pm +++ b/lib/WebCoso/Maker.pm @@ -41,9 +41,9 @@ role WebCoso::Maker[$from,$to] { my $dst = %dsts{$lang}; my @deps = %deps{$lang} // (); say "Maker[$from,$to]($.dir/$.basename)::make lang $lang"; - say "Maker[$from,$to]($.dir/$.basename)::make dst modified {$dst ?? $dst.modified !! 'not-there'} src modified {$src.modified}"; - next if $dst and not $dst.modified before - all($src.modified,@deps».modified.flat); + say "Maker[$from,$to]($.dir/$.basename)::make dst modified {$dst ?? $dst.modified !! 'not-there'} src modified {$src.modified} deps modified {@deps».modified}"; + next if $dst and not ($dst.modified <= + all($src.modified,@deps».modified.flat)); say "Maker[$from,$to]($.dir/$.basename)::make processing $lang"; my ($processed-contents,@new_deps) = self.process-contents( |