my $output=htmlpage($page);
writefile($output, $config{destdir}, genpage($page, $content));
my $output=htmlpage($page);
writefile($output, $config{destdir}, genpage($page, $content));
my ($new, $internal_new)=find_new_files($files);
my ($del, $internal_del)=find_del_files($pages);
my ($changed, $internal_changed)=find_changed($files);
my ($new, $internal_new)=find_new_files($files);
my ($del, $internal_del)=find_del_files($pages);
my ($changed, $internal_changed)=find_changed($files);
- run_hooks(needsbuild => sub { shift->($changed) });
+ run_hooks(needsbuild => sub {
+ my $ret=shift->($changed, [@$del, @$internal_del]);
+ $changed=$ret if ref $ret eq 'ARRAY';
+ });
my $oldlink_targets=calculate_old_links($changed, $del);
foreach my $file (@$changed) {
my $oldlink_targets=calculate_old_links($changed, $del);
foreach my $file (@$changed) {
my $content=readfile($srcfile);
my $page=pagename($file);
$pagesources{$page}=$file;
my $content=readfile($srcfile);
my $page=pagename($file);
$pagesources{$page}=$file;
$content=preprocess($page, $page, $content);
$content=linkify($page, $page, $content);
$content=htmlize($page, $page, $type, $content);
$content=preprocess($page, $page, $content);
$content=linkify($page, $page, $content);
$content=htmlize($page, $page, $type, $content);