About this file
+
+This file is generated dynamically by lpml_parse.pl as
+part of a development compilation process. Author: Scott
+Harrison (harris41\@msu.edu).
+
+END
+ }
+ elsif ($mode eq 'text') {
+ $lpml = "LPML Description Page (dist=$dist, $date)";
+ $lpml .=<get_text('/rpm'));
$parser->get_tag('/rpm');
if ($mode eq 'html') {
- return $rpm="\n
BEGIN RPM\n$text\n
END RPM";
+ return $rpm=<Software Package Description
+
+
+END
+ }
+ elsif ($mode eq 'text') {
+ return $rpm=<get_text('/rpmSummary'));
$parser->get_tag('/rpmSummary');
if ($mode eq 'html') {
- return $rpmSummary="\n
RPMSUMMARY $text";
+ return $rpmSummary="\nSummary : $text";
+ }
+ elsif ($mode eq 'text') {
+ return $rpmSummary="\nSummary : $text";
}
else {
return '';
@@ -799,14 +856,16 @@ $buildtest \@if !(test -e "${sourceroot}
echo "**** ERROR **** CVS source file does not exist: ${sourceroot}/${source} and neither does target: ${targetroot}/${target}"$logcmd; \\
elif !(test -e "${sourceroot}/${source}"); then \\
echo "**** WARNING **** CVS source file does not exist: ${sourceroot}/${source}"$logcmd; \\
+ perl verifymodown.pl ${targetroot}/${target} "$categoryhash{$categoryname}"$logcmd; \\
else \\
ECODE=0; \\
perl filecompare.pl $bflag ${sourceroot}/${source} ${targetroot}/${target} || ECODE=\$\$?; \\
case "\$\$ECODE" in \\
1) echo "${targetroot}/${target} is unchanged";; \\
- 2) echo "**** WARNING **** target file ${targetroot}/${target} is newer than CVS source; creating ${targetroot}/${target}.lpmlnewfile instead"$logcmd && install -o www -g www -m 0500 ${sourceroot}/${source} ${targetroot}/${target}.lpmlnewfile;; \\
- 0) echo "install -o www -g www -m 0500 ${sourceroot}/${source} ${targetroot}/${target}" && install -o www -g www -m 0500 ${sourceroot}/${source} ${targetroot}/${target};; \\
+ 2) echo "**** WARNING **** target file ${targetroot}/${target} is newer than CVS source; saving current (old) target file to ${targetroot}/${target}.lpmlsave and then overwriting"$logcmd && install -o www -g www -m 0600 ${targetroot}/${target} ${targetroot}/${target}.lpmlsave && install $categoryhash{$categoryname} ${sourceroot}/${source} ${targetroot}/${target};; \\
+ 0) echo "install $categoryhash{$categorname} ${sourceroot}/${source} ${targetroot}/${target}" && install $categoryhash{$categoryname} ${sourceroot}/${source} ${targetroot}/${target};; \\
esac; \\
+ perl verifymodown.pl ${targetroot}/${target} "$categoryhash{$categoryname}"$logcmd; \\
fi
END
# return "\t".'@test -e '.$sourceroot.'/'.$source.
@@ -829,12 +888,12 @@ END
'{ [ $$ECODE != "2" ] || (install '.
$categoryhash{$categoryname}.' '.
$sourceroot.'/'.$source.' '.
- $targetroot.'/'.$target.'.lpmlnewconf'.
+ $targetroot.'/'.$target.'.lpmlnew'.
' && echo "**** NOTE: CONFIGURATION FILE CHANGE ****"'.
$logcmd.' && echo "'.
'You likely need to compare contents of '.
''.$targetroot.'/'.$target.' with the new '.
- ''.$targetroot.'/'.$target.'.lpmlnewconf"'.
+ ''.$targetroot.'/'.$target.'.lpmlnew"'.
"$logcmd); } && ".
'{ [ $$ECODE != "3" ] || (install '.
$categoryhash{$categoryname}.' '.
@@ -851,7 +910,7 @@ END
$logcmd.' && echo "'.
'Configuration source file does not exist '.
''.$sourceroot.'/'.$source.'"'.
- "$logcmd); };\n\n";
+ "$logcmd); } && perl verifymodown.pl ${targetroot}/${target} \"$categoryhash{$categoryname}\"$logcmd;\n\n";
}
elsif ($mode eq 'build' && $build) {
push @buildall,$sourceroot.'/'.$source;