--- loncom/build/make_rpm.pl	2002/04/10 05:58:17	1.18
+++ loncom/build/make_rpm.pl	2002/04/10 06:23:48	1.19
@@ -8,7 +8,7 @@
 # The LearningOnline Network with CAPA
 # make_rpm.pl - make RedHat package manager file (A CLEAN AND CONFIGURABLE WAY)
 #
-# $Id: make_rpm.pl,v 1.18 2002/04/10 05:58:17 harris41 Exp $
+# $Id: make_rpm.pl,v 1.19 2002/04/10 06:23:48 harris41 Exp $
 #
 # Written by Scott Harrison, harris41@msu.edu
 #
@@ -265,6 +265,7 @@ $tv=grabtag('pre',$cu,0); $pre=$tv if $t
 $pre=~s/\<tag \/\>/$tag/g;
 
 # ------------------------------------- Print header information for .spec file
+print('Print header information for .spec file'."\n");
 
 print(SPEC <<END);
 Summary: $summary
@@ -303,6 +304,7 @@ $pre
 END
 
 # ------------------------------------ Process file list and gather information
+print('Process standard input file list and gather information.'."\n");
 
 my %BinaryRootMakefile;
 my %Makefile;
@@ -359,6 +361,7 @@ foreach my $file (<>) {
 }
 
 # -------------------------------------- Generate SRPM and BinaryRoot Makefiles
+print('Generate SRPM and BinaryRoot Makefiles.'."\n");
 
 # Generate a much needed directory.
 # This directory is meant to hold all source code information
@@ -383,6 +386,7 @@ close(OUTS);
 close(SPEC);
 
 # ------------------ mirror copy (BinaryRoot) files under a temporary directory
+print('Mirror copy (BinaryRoot) files.'."\n");
 
 `make -f $tag/BinaryRootMakefile directories`;
 `make -f $tag/BinaryRootMakefile files`;