--- loncom/build/lpml_parse.pl	2001/11/07 16:53:52	1.16
+++ loncom/build/lpml_parse.pl	2001/11/07 16:59:51	1.17
@@ -85,7 +85,7 @@ $targetroot=~s/\/$//;
 
 my $invocation;
 # --------------------------------------------------- Record program invocation
-if ($mode eq 'install') {
+if ($mode eq 'install' or $mode eq 'configinstall' or $mode eq 'build') {
     $invocation=(<<END);
 # Invocation: STDINPUT | lpml_parse.pl
 #             1st argument (mode) is: $mode
@@ -341,7 +341,8 @@ sub format_lpml {
 	$lpml .= "SHELL=\"/bin/bash\"\n\n";
     }
     elsif ($mode eq 'configinstall') {
-	print '# LPML configuration targets. Linux Packaging Markup Language,';
+	print '# LPML configuration file targets (configinstall).'."\n";
+	print '# Linux Packaging Markup Language,';
 	print ' by Scott Harrison 2001'."\n";
 	print '# This file was automatically generated on '.`date`;
 	print "\n".$invocation;
@@ -351,7 +352,7 @@ sub format_lpml {
 	$lpml = "# LPML build targets. Linux Packaging Markup Language,";
 	$lpml .= ' by Scott Harrison 2001'."\n";
 	$lpml .= '# This file was automatically generated on '.`date`;
-	$lpml .= "\n";
+	$lpml .= "\n".$invocation;
 	$lpml .= "SHELL=\"/bin/sh\"\n\n";
     }
     else {
@@ -366,10 +367,8 @@ sub format_targetroot {
     if ($mode eq 'html') {
 	return $targetroot="\n<br />TARGETROOT: $text";
     }
-    elsif ($mode eq 'install') {
-	return '# TARGET INSTALL LOCATION is "'.$targetroot."\"\n";
-    }
-    elsif ($mode eq 'build') {
+    elsif ($mode eq 'install' or $mode eq 'build' or
+	   $mode eq 'configinstall') {
 	return '# TARGET INSTALL LOCATION is "'.$targetroot."\"\n";
     }
     else {
@@ -384,10 +383,8 @@ sub format_sourceroot {
     if ($mode eq 'html') {
 	return $sourceroot="\n<br />SOURCEROOT: $text";
     }
-    elsif ($mode eq 'install') {
-	return '# SOURCE CODE LOCATION IS "'.$sourceroot."\"\n";;
-    }
-    elsif ($mode eq 'build') {
+    elsif ($mode eq 'install' or $mode eq 'build' or
+	   $mode eq 'configinstall') {
 	return '# SOURCE CODE LOCATION IS "'.$sourceroot."\"\n";;
     }
     else {