Lines Matching refs:projfile
363 my $projfile;
377 GetOptions("f=s" => \$projfile,
404 if (defined($opt_A) && defined($projfile)) {
408 if (! defined($projfile)) {
409 $projfile = &PROJF_PATH;
412 if ($modify && $projfile eq '-') {
440 my $tmpprojf = $projfile . ".tmp.$$";
447 if ($projfile eq '-') {
450 } elsif (! sysopen($pfh, $projfile, O_RDONLY)) {
451 error([10, gettext('Cannot open %s: %s'), $projfile, $!]);
659 if (! rename($tmpprojf, $projfile)) {
662 $tmpprojf, $projfile, $!]);