version 1.11, 1999/12/16 22:18:35
|
version 1.12, 2000/01/12 21:00:25
|
Line 1580 proc replaceAll {} {
|
Line 1580 proc replaceAll {} {
|
set gCreateImportLinks 1 |
set gCreateImportLinks 1 |
getFindWindow refNum |
getFindWindow refNum |
if { $refNum >= 0 } { registerCreateImportLinks $refNum 0.0 end } |
if { $refNum >= 0 } { registerCreateImportLinks $refNum 0.0 end } |
displayMessage "Replaced $num occurance$s" |
displayMessage "Replaced $num occurrence$s" |
} |
} |
|
|
########################################################### |
########################################################### |
Line 3806 proc printBody { lprCommand { showComple
|
Line 3806 proc printBody { lprCommand { showComple
|
-o quiztemp.ps >& /dev/null} errorMsg ] |
-o quiztemp.ps >& /dev/null} errorMsg ] |
if { $error } { |
if { $error } { |
displayError \ |
displayError \ |
"When attempting to run dvips an error occured : $errorMsg" |
"When attempting to run dvips an error occurred : $errorMsg" |
return 1 |
return 1 |
} |
} |
|
|
Line 3821 proc printBody { lprCommand { showComple
|
Line 3821 proc printBody { lprCommand { showComple
|
set error [catch {set returnMessage [eval "exec $lprCommand"] } errorMsg ] |
set error [catch {set returnMessage [eval "exec $lprCommand"] } errorMsg ] |
|
|
if { $error == 1 } { |
if { $error == 1 } { |
displayError "When attempting to print an error occured : $errorMsg" |
displayError "When attempting to print an error occurred : $errorMsg" |
return 1 |
return 1 |
} else { |
} else { |
if { $showCompletionMessage } { |
if { $showCompletionMessage } { |