Searched refs:extdir (Results 1 – 1 of 1) sorted by relevance
6680 ($extdir = $ENV{'ext'}) =~ s/::/./g;6681 $extdir =~ s#/#.#g;6682 if ($extdir =~ /^vms/i) { $extdir =~ s/vms/.vms.ext/i; }6683 else { $extdir = ".ext.$extdir"; }6684 ($ENV{'extdir'} = "[$extdir]");6685 ($ENV{'up'} = ('-') x ($extdir =~ tr/././));6687 $ Set Default &extdir