diff options
Diffstat (limited to 'tests/filebox.test')
-rw-r--r-- | tests/filebox.test | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/filebox.test b/tests/filebox.test index 97b313f..02e9295 100644 --- a/tests/filebox.test +++ b/tests/filebox.test @@ -7,7 +7,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: filebox.test,v 1.4 1998/09/14 18:23:46 stanton Exp $ +# RCS: @(#) $Id: filebox.test,v 1.5 1998/12/07 23:29:00 hershey Exp $ # set tk_strictMotif_old $tk_strictMotif @@ -187,10 +187,9 @@ foreach mode $modes { } else { set thisFile [info script] set fileName [file tail $thisFile] - set appPWD [pwd] - cd [file dirname $thisFile] + + # this file should be in the current working dir set fileDir [pwd] - cd $appPWD set pathName [file join $fileDir $fileName] } |