Lines Matching refs:dest
484 my $dest = shift;
491 if ( -d $local_source && can_use_hardlinks($local_source, $dest) ) {
496 print_message("... clone LOCAL repository '$local_source' to '$dest'");
501 print_message("... clone LAN repository '$lan_source' to '$dest'");
503 hg_clone($source, $dest, $clone_option);
512 my $dest = shift;
515 print_message("... pull from REMOTE repository '$remote_source' to '$dest'");
516 hg_pull($dest, $remote_source);
523 my $dest = shift;
526 print_message("... update repository '$dest'");
527 hg_update($dest);
552 my $dest = shift;
560 my @stat_dest = stat(dirname($dest));
2008 my $dest = shift;
2012 print STDERR "CWS-DEBUG: ... hg clone: '$source -> $dest', options: '$options'\n";
2017 my @result = execute_hg_command(0, 'clone', $options, $source, $dest);
2020 @result = execute_hg_command(1, 'clone', $options, $source, $dest);