version 1.18, 2002/04/10 05:58:17
|
version 1.19, 2002/04/10 06:23:48
|
Line 265 $tv=grabtag('pre',$cu,0); $pre=$tv if $t
|
Line 265 $tv=grabtag('pre',$cu,0); $pre=$tv if $t
|
$pre=~s/\<tag \/\>/$tag/g; |
$pre=~s/\<tag \/\>/$tag/g; |
|
|
# ------------------------------------- Print header information for .spec file |
# ------------------------------------- Print header information for .spec file |
|
print('Print header information for .spec file'."\n"); |
|
|
print(SPEC <<END); |
print(SPEC <<END); |
Summary: $summary |
Summary: $summary |
Line 303 $pre
|
Line 304 $pre
|
END |
END |
|
|
# ------------------------------------ Process file list and gather information |
# ------------------------------------ Process file list and gather information |
|
print('Process standard input file list and gather information.'."\n"); |
|
|
my %BinaryRootMakefile; |
my %BinaryRootMakefile; |
my %Makefile; |
my %Makefile; |
Line 359 foreach my $file (<>) {
|
Line 361 foreach my $file (<>) {
|
} |
} |
|
|
# -------------------------------------- Generate SRPM and BinaryRoot Makefiles |
# -------------------------------------- Generate SRPM and BinaryRoot Makefiles |
|
print('Generate SRPM and BinaryRoot Makefiles.'."\n"); |
|
|
# Generate a much needed directory. |
# Generate a much needed directory. |
# This directory is meant to hold all source code information |
# This directory is meant to hold all source code information |
Line 383 close(OUTS);
|
Line 386 close(OUTS);
|
close(SPEC); |
close(SPEC); |
|
|
# ------------------ mirror copy (BinaryRoot) files under a temporary directory |
# ------------------ mirror copy (BinaryRoot) files under a temporary directory |
|
print('Mirror copy (BinaryRoot) files.'."\n"); |
|
|
`make -f $tag/BinaryRootMakefile directories`; |
`make -f $tag/BinaryRootMakefile directories`; |
`make -f $tag/BinaryRootMakefile files`; |
`make -f $tag/BinaryRootMakefile files`; |