A Further Modification
You may want to add another if/else command to the commands shown in the Test the location of a document example. Using the pwd command to print the working directory slows things down a little bit. In some cases, the value of the variable $dirname is already the complete path. You can speed things up in some cases by checking to see whether the value of $dirname is already a complete path and if it is, using it as the value for $workingdir:
if (substr($dirname,1,1)=='\') {
$workingdir=$dirname;
} else { $workingdir= `pwd`;}
if (index($wd,'conf')!=0 && $doctype==memo) {
modify_tag -global document \
scilevel=secret;}
$dirname is a predefined Arbortext Editor variable. Its value is the name of the current document directory. The initial if/else command uses the substr function to find out whether the directory name begins with a backslash (\). If the name does begin with a backslash, the value of $dirname is a complete path, in which case it can be used as the value for $workingdir. If the name does not begin with a slash, the status of the index function will be 0, the initial if condition will not be true, and the else clause is invoked, calling pwd to get the complete path.
Est-ce que cela a été utile ?