INTEGRATION: CWS hr15 (1.15.132); FILE MERGED
2005/04/20 17:08:36 hr 1.15.132.1: #i46299#,#113693#: add cwsresyc -m HEAD feature, fix unzipping of archives for cwsresync -l
This commit is contained in:
parent
a767605309
commit
7109e122a6
1 changed files with 3 additions and 4 deletions
|
@ -5,9 +5,9 @@ eval 'exec perl -wS $0 ${1+"$@"}'
|
|||
#
|
||||
# $RCSfile: cwsresync.pl,v $
|
||||
#
|
||||
# $Revision: 1.16 $
|
||||
# $Revision: 1.17 $
|
||||
#
|
||||
# last change: $Author: obo $ $Date: 2005-04-22 13:35:09 $
|
||||
# last change: $Author: obo $ $Date: 2005-04-22 13:43:26 $
|
||||
#
|
||||
# The Contents of this file are made available subject to the terms of
|
||||
# either of the following licenses
|
||||
|
@ -62,7 +62,6 @@ eval 'exec perl -wS $0 ${1+"$@"}'
|
|||
#
|
||||
#
|
||||
#*************************************************************************
|
||||
|
||||
#
|
||||
# cwsresync.pl - sync child workspace modules/files with newer
|
||||
# milestones of master workspace
|
||||
|
@ -108,7 +107,7 @@ use CwsConfig;
|
|||
( my $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/;
|
||||
|
||||
my $script_rev;
|
||||
my $id_str = ' $Revision: 1.16 $ ';
|
||||
my $id_str = ' $Revision: 1.17 $ ';
|
||||
$id_str =~ /Revision:\s+(\S+)\s+\$/
|
||||
? ($script_rev = $1) : ($script_rev = "-");
|
||||
|
||||
|
|
Loading…
Reference in a new issue