abagchi 99/11/19 16:15:54
Modified: c/scripts packageSources.pl
Log:
Removed change_version_numbers()
Revision Changes Path
1.4 +0 -30 xml-xerces/c/scripts/packageSources.pl
Index: packageSources.pl
===================================================================
RCS file: /home/cvs/xml-xerces/c/scripts/packageSources.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- packageSources.pl 1999/11/13 01:29:21 1.3
+++ packageSources.pl 1999/11/20 00:15:54 1.4
@@ -195,11 +195,6 @@
# Walk through the source directory structure and delete all CVS
directories
&deleteCVSdirs($srctargetdir);
- #Change the version number in the user documentation
- &change_version_number($srctargetdir . "/doc/installation.html",
$binarydirectoryname);
- &change_version_number($srctargetdir . "/doc/programming.html",
$binarydirectoryname);
- &change_version_number($srctargetdir . "/doc/distribution.html",
$binarydirectoryname);
-
# remove the export clauses
chdir ("$srctargetdir/doc/apiDocs");
opendir (THISDIR, "$srctargetdir/doc/apiDocs");
@@ -230,31 +225,6 @@
}
print ("Done with packaging sources.\n");
}
-
-sub change_version_number()
-{
- my ($thefile, $version_num) = @_;
- print "\nChanging all version numbers in file $thefile to
$version_num";
- my $thefiledotbak = $thefile . ".bak";
- rename ($thefile, $thefiledotbak);
-
- $dll_name = "xerces-c_" . $libraryversion;
- $dll_name =~ tr/a-z/A-Z/;
- my $srcversion_num = $version_num;
- $srcversion_num =~ s/xml4c2/xerces_1/ig;
- open (FIZZLE, $thefiledotbak);
- open (FIZZLEOUT, ">$thefile");
- while ($line = <FIZZLE>) {
- $line =~ s/xml4c2srcreleasenum/$srcversion_num/ig;
- $line =~ s/xml4c2releasenum/$version_num/ig;
- $line =~ s/XML4C2dllname/$dll_name/ig;
- print FIZZLEOUT $line;
- }
- close (FIZZLEOUT);
- close (FIZZLE);
- unlink ($thefiledotbak);
-}
-
sub remove_export_clauses()
{
