needs to be a hash reference
This commit is contained in:
parent
df18376192
commit
00b4931cbb
4
build.pl
4
build.pl
|
@ -164,7 +164,7 @@ foreach my $post (@posts) {
|
||||||
print " Processing $post->{fname}...\n";
|
print " Processing $post->{fname}...\n";
|
||||||
my %post_hash = %utils;
|
my %post_hash = %utils;
|
||||||
$post_hash{post} = \$post;
|
$post_hash{post} = \$post;
|
||||||
my $post_content = $post_tmpl->fill_in(HASH => %post_hash);
|
my $post_content = $post_tmpl->fill_in(HASH => \%post_hash);
|
||||||
if (defined($post_content)) {
|
if (defined($post_content)) {
|
||||||
open(POSTOUT, '>', "$postout_path/$post->{fname}.html") or die("Unable to write $post->{fname}.html: $!");
|
open(POSTOUT, '>', "$postout_path/$post->{fname}.html") or die("Unable to write $post->{fname}.html: $!");
|
||||||
print POSTOUT $post_content;
|
print POSTOUT $post_content;
|
||||||
|
@ -181,7 +181,7 @@ foreach my $pg (@pages) {
|
||||||
print " Processing $pg->{fname}...\n";
|
print " Processing $pg->{fname}...\n";
|
||||||
my %page_hash = %utils;
|
my %page_hash = %utils;
|
||||||
$page_hash{posts} = \@posts;
|
$page_hash{posts} = \@posts;
|
||||||
my $page_content = $pg->{tmpl}->fill_in(HASH => %page_hash);
|
my $page_content = $pg->{tmpl}->fill_in(HASH => \%page_hash);
|
||||||
if (defined($page_content)) {
|
if (defined($page_content)) {
|
||||||
open(PGOUT, '>', "$out_path/$pg->{fname}") or die("Unable to write $pg->{fname}: $!");
|
open(PGOUT, '>', "$out_path/$pg->{fname}") or die("Unable to write $pg->{fname}: $!");
|
||||||
print PGOUT $page_content;
|
print PGOUT $page_content;
|
||||||
|
|
Loading…
Reference in a new issue