Changeset 21498 for branches/ipp-magic-v0/psconfig/psbuild
- Timestamp:
- Feb 15, 2009, 5:45:22 PM (17 years ago)
- File:
-
- 1 edited
-
branches/ipp-magic-v0/psconfig/psbuild (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/ipp-magic-v0/psconfig/psbuild
r21497 r21498 1 1 #!/usr/bin/env perl 2 2 3 # Get the CVS tag 3 $tagsets = "tagsets"; 4 if (!-d $tagsets || !-r $tagsets || !-x $tagsets) { die "missing the directory of distribution tables: $tagsets\n"; } 5 6 # Get the default CVS tag 4 7 $cvsNameString= '$Name: not supported by cvs2svn $'; 5 if ( $cvsNameString =~ /\$ Name: not supported by cvs2svn$/ ) {8 if ( $cvsNameString =~ /\$[N]ame: (.+) $/ ) { 6 9 $cvsTag = $1; 7 10 } 8 else { die "ERROR: cannot parse CVS tag string\n"; } 9 10 $tagsets = "tagsets"; 11 if (!-d $tagsets || !-r $tagsets || !-x $tagsets) { die "missing the directory of distribution tables: $tagsets\n"; } 11 else { 12 @list = <$tagsets/*.dist>; 13 14 if ( $list[-1] =~ /$tagsets\/(.+)\.dist/ ) { 15 $cvsTag = $1; 16 } 17 else { die "ERROR: unable to determine version tag\n"; } 18 } 12 19 13 20 $version = "";
Note:
See TracChangeset
for help on using the changeset viewer.
