solenv/bin/cws.pl

243     my $child  = $ENV{CWS_WORK_STAMP};
246     if ( !$child ) {
255     $cws->child($child);
261         print STDERR "CWS-DEBUG: ... master: $master, child: $child, $id\n";
264 …  print_error("Child workspace $child for master workspace $master not found in EIS database.", 2);
272     my $child  = shift;
275     $cws->child($child);
280         print STDERR "CWS-DEBUG: child: $child, $id\n";
283         print_error("Child workspace $child not found in EIS database.", 2);
306     my $child     = $cws->child();
317 … print_error("Can't determine owner for CWS '$child'. Please set VCSID environment variable.", 11);
320 …print_error("Can't determine owner for CWS '$child'. Please set CVS_ID entry in \$HOME/.cwsrc.", 1…
327 …print_error("Failed to set the SCM property '$scm' on child workspace '$child'.\nContact EIS admin…
333             print_error("Failed to promote child workspace '$child' to status 'new'.\n", 12);
336             print "\n***** Successfully ***** promoted child workspace '$child' to status 'new'.\n";
345             print_error("Failed to register child workspace '$child' for master '$master'.", 12);
350 …print_error("Failed to set the SCM property '$scm' on child workspace '$child'.\nContact EIS admin…
352             print "\n***** Successfully ***** registered child workspace '$child'\n";
432             $cws_remote_source = "$hg_remote_source/cws/" . $cws->child();
437             $cws_remote_source = "$hg_remote_source/cws_".$rep_type."/" . $cws->child();
449         my $pattern = "<title>cws/". $cws->child();
450         my $pattern2 = "<title>cws_".$rep_type."/". $cws->child();
592         $cws->child($childws);
667     my $childws  = $cws->child();
684     my $childws  = $cws->child();
1022     my $childws  = $cws->child();
1531     $cws->child($cws_name);
1591     my $child = $options_ref->{'childworkspace'};
1598     if ( !defined($milestone_opt) && !defined($child) ) {
1603     if ( defined($milestone_opt) && defined($child) ) {
1639     elsif ( defined($child) ) {
1640         $cws = get_cws_by_name($child);
1708     my $cwsname = $cws->child();
1862     my $child = $cws->child();
1878         print_error("Can't determine status of child workspace `$child`.", 20);
1882         print_error("Can't add tasks to child workspace '$child' with state '$status'.", 21);
1909 …      print_error("Couldn't register taskID(s) '$taskids_str' with child workspace '$child'.", 23);
1914         print_message("Registered taskID(s) '$taskids_str' with child workspace '$child'.");