Home | History | Annotate | Download | only in Scripts

Lines Matching refs:newFile

189             my $newFile = "";
190 $newFile = "$1$renames{$2}$3" if $file =~ /^(.*\/\w*)($key)(\w*\.\w+)$/;
191 if ($newFile ne "") {
192 return $newFile;
201 my %newFile;
205 $newFile{$file} = $f;
210 if ($newFile{$file}) {
211 my $newFile = $newFile{$file};
212 print "Renaming $file to $newFile\n";
213 scmMoveOrRenameFile($file, $newFile);
220 $file = $newFile{$file} if $newFile{$file};