bin/modules/CwsConfig.pm

216 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_server_root(), 'SERVER'…
224 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_mirror_root(), 'MIRROR'…
232 … my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_local_root(), 'LOCAL');
240 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_server_root(), 'SERVER'…
248 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_mirror_root(), 'MIRROR'…
256 … my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_local_root(), 'LOCAL');
264 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_server_root(), 'SERVER'…
265     return $repository;
272 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_mirror_root(), 'MIRROR'…
273     return $repository;
280 … my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_local_root(), 'LOCAL');
281     return $repository;
288 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_server_root(), 'SERVER'…
296 …my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_mirror_root(), 'MIRROR'…
304 … my ($method, $id, $server, $repository) = CwsConfig::split_root($self->cvs_local_root(), 'LOCAL');
361     my $repository  = shift;
365     if ($repository eq "OOO")
384             return $self->_get_hg_source($repository.'_HG_LOCAL_SOURCE');
388             return $self->_get_hg_source($repository.'_HG_LAN_SOURCE');
392             return $self->_get_hg_source($repository.'_HG_REMOTE_SOURCE');
432     my ($dummy, $method, $id_at_host, $repository) = split(/:/, $root);
433     $repository =~ s/^\d*//;
438     if ( !defined($method) || !defined($id) || !defined($server) || !defined($repository) ) {
440         print  "$method, $id, $server, $repository\n";
443     return ($method, $id, $server, $repository);