bliper

static html page generation in perl
git clone git://git.2f30.org/bliper
Log | Files | Refs | README | LICENSE

commit 51bb430a041dda29f671eff15f5e7938790c2186
parent fe8b7633034ac648a5e428ff8f59df98f9780c5d
Author: cipher <haris@2f30.org>
Date:   Fri, 16 May 2014 20:09:43 +0300

Remove hr, getting super-fancy with unicode chars

Diffstat:
Mbin/bliper-generate.pl | 4+---
1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/bin/bliper-generate.pl b/bin/bliper-generate.pl @@ -52,7 +52,6 @@ sub cssinit() { } } - unlink glob "output/*.html"; # Remove old pages unlink "output/tmp"; # File which stores menu open (OUT, '>', "$outdir/index.html") or die $!; # Create the index.html page @@ -83,7 +82,6 @@ foreach my $page (@pages) { } print OUT "</ul>"; -print OUT "<hr>"; print OUT "<br>"; close OUT or die $!; @@ -121,7 +119,7 @@ foreach my $file (@files) { # Read each file(post) from indir, cat to $outdi $preview_array[1]<br> $preview_array[2]<br> <a class=\"previewlink\" href=\"$file.html\"> - <em>read more...</em></a></p></div>"; + <em>read more... →</em></a></p></div>"; print OUT "\n"; print OUT "<br>"; }