diff options
Diffstat (limited to 'tests/pid.test')
-rw-r--r-- | tests/pid.test | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/pid.test b/tests/pid.test index c539fc4..4ce4d03 100644 --- a/tests/pid.test +++ b/tests/pid.test @@ -13,7 +13,9 @@ # # RCS: @(#) $Id: pid.test,v 1.6 2000/04/10 17:19:03 ericm Exp $ -source testing.tcl +source [file dirname [info script]]/testing.tcl + +needs cmd pid posix file delete test1 @@ -35,7 +37,7 @@ test pid-1.3 {pid command} { close $f set pids } {} -test pid-1.4 {pid command} { +test pid-1.4 {pid command} jim { list [catch {pid a b} msg] $msg } {1 {wrong # args: should be "pid ?chan?"}} test pid-1.5 {pid command} { |