Subversion Repositories DevTools

Rev

Rev 349 | Rev 353 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 349 Rev 351
Line 142... Line 142...
142 
#   Sanity check the form of the baselabel
 142 
#   Sanity check the form of the baselabel
143 
#   It will be used to calulate a new Version Control String
 143 
#   It will be used to calulate a new Version Control String
144 
#   Baselabel contains: PATH and a LABEL
 144 
#   Baselabel contains: PATH and a LABEL
145 
#   Need to extract and save the path
 145 
#   Need to extract and save the path
146 
#
 146 
#
- 
 
 147 
 $opt_baselabel =~ tr~\\/~/~s;
147 
 $opt_baselabel =~ m~^CC::/(.+)::~ || Error("Invalid baselabel format: $opt_baselabel");
 148 
 $opt_baselabel =~ m~^CC::/(.+)::~ || Error("Invalid baselabel format: $opt_baselabel");
148 
 my $ccpath = $1;
 149 
 my $ccpath = $1;
149 
 
 150 
 
150 
#
 151 
#
151 
#   Determine the name of the Branch to be used
 152 
#   Determine the name of the Branch to be used