bliper

commit 34fffb79dd37fa7e36205860711b5c75fdf1f58a
parent 54af98f49e3831df00f84ac7ceedbc4a00e8d097
Author: cipher <haris@2f30.org>
Date:   Tue,  3 Dec 2013 15:04:37 +0200

saner output messages in Makefile and bliper-generate.pl

Diffstat:
M
Makefile
 | 
2
++
M
bin/bliper-generate.pl
 | 
8
+++++---

2 files changed, 7 insertions(+), 3 deletions(-)
diff --git a/Makefile b/Makefile
@@ -4,6 +4,8 @@ bliper.create:
 	@exec perl bin/bliper-generate.pl
 
 menu.create:
+	@echo ""
+	@echo "Generating menu in the following pages:"
 	@exec sh bin/bliper-menu-creation.sh
 
 clean:
diff --git a/bin/bliper-generate.pl b/bin/bliper-generate.pl
@@ -54,7 +54,7 @@ close OUT or die $!;
 chdir($main_dir) or die "Can't change path to $main_dir $!\n";
 print "\nIndividual page generation completed. ";
 chdir($indir) or die "Can't change path to $indir $!\n";
-print "Entering " . getcwd . "\n\n";
+print "\nEntering " . getcwd . "\n\n";
 
 my @files = <*>;
 @files = reverse @files;
@@ -77,12 +77,13 @@ foreach my $file (@files) {					# Read each file(post) from indir, cat to $outdi
 }
 
 chdir($main_dir) or die "Can't change path to $main_dir $!\n";
+print "\nArticle generation completed. ";
 chdir($pages_b) or die "Can't change path to $indir $!\n";
-print "Entering " . getcwd . "\n\n";
+print "\nEntering " . getcwd . "\n\n";
 
 my @ind_pages = <*>;
 foreach my $file (@ind_pages) {					# Read each page that we do not want to add in our menu
-	print "Processing individual page:";
+	print "Processing pages:";
 	printf ("%-30s", $file);
 	print "\t==> output file:\t" . "../$outdir/$file.html\n";
 	my @array = qx(cat $file);
@@ -99,6 +100,7 @@ print OUT @mainb;
 print OUT @footer;
 close OUT;
 
+print "\nPages in pages_b/ generation completed. ";
 print "\nLeaving " . getcwd . "\n";
 chdir($main_dir) or die "Can't change path to $main_dir $!\n";
 print "Site generation completed. Files are in output/ dir.\n";