bliper

commit 07e76410b0abd57abda0064247e052963d7ed542
parent b52c6c8fde1e7d41bb890bc8404bc466710cbe5b
Author: haris <haris@metal.lan>
Date:   Sun, 17 Nov 2013 19:03:51 +0200

fixed tabs alignment

Diffstat:
M
bin/bliper-generate.pl
 | 
24
++++++++++++------------

1 file changed, 12 insertions(+), 12 deletions(-)
diff --git a/bin/bliper-generate.pl b/bin/bliper-generate.pl
@@ -21,19 +21,19 @@ print "Entering " . getcwd . "\n";
 
 my @files = <*>;
 foreach my $file (@files) {					# Read each file(post) from indir, cat to $outdir/$file.html
-	print "Processing file: " . $file . "\t==> output file:\t" . "../$outdir/$file.html" . "\n";
-	my @array = qx(cat $file);
-	open (OUT, '>', "../$outdir/$file.html") or die $!;
-	print OUT @paget;
-	my @html = qx(Markdown.pl $file);			# markdown to html
-	print OUT @html;					# append content
-	print OUT @pageb;
-	close OUT;
+    print "Processing file: " . $file . "\t==> output file:\t" . "../$outdir/$file.html" . "\n";
+    my @array = qx(cat $file);
+    open (OUT, '>', "../$outdir/$file.html") or die $!;
+    print OUT @paget;
+    my @html = qx(Markdown.pl $file);				# markdown to html
+    print OUT @html;						# append content
+    print OUT @pageb;
+    close OUT;
 	
-	open (OUT, '>>', "../$outdir/index.html") or die $!;	# append links to stories
-	print OUT "<a href=\"$file.html\">$file</a>";
-	print OUT "\n";
-	print OUT "<br>";
+    open (OUT, '>>', "../$outdir/index.html") or die $!;	# append links to stories
+    print OUT "<a href=\"$file.html\">$file</a>";
+    print OUT "\n";
+    print OUT "<br>";
 }
 
 open (OUT, '>>', "../$outdir/index.html") or die $!;		# close all tags in index.html