1 files changed, 4 insertions, 20 deletions
diff --git a/tests/clipboard.test b/tests/clipboard.test
index e84a820..37e45a3 100644
--- a/tests/clipboard.test
+++ b/tests/clipboard.test
@@ -12,10 +12,7 @@
 #
 
 package require tcltest 2.1
-namespace import -force tcltest::configure
-namespace import -force tcltest::testsDirectory
-configure -testdir [file join [pwd] [file dirname [info script]]]
-configure -loadfile [file join [testsDirectory] constraints.tcl]
+eval tcltest::configure $argv
 tcltest::loadTestedCommands
 
 # set up a very large buffer to test INCR retrievals
@@ -164,14 +161,14 @@ test clipboard-6.1 {Tk_ClipboardAppend procedure} {
 	clipboard get
     } msg] $msg
 } {0 {first chunk second chunk}}
-test clipboard-6.2 {Tk_ClipboardAppend procedure} {unixOnly} {
+test clipboard-6.2 {Tk_ClipboardAppend procedure} unix {
     setupbg
     clipboard clear
     clipboard append -f INTEGER -t TEST "16"
     set result [dobg {clipboard get TEST}]
     cleanupbg
     set result
-} {0x10}
+} {0x10 }
 test clipboard-6.3 {Tk_ClipboardAppend procedure} {
     clipboard clear
     clipboard append -f INTEGER -t TEST "16"
@@ -243,18 +240,5 @@ test clipboard-7.16 {Tk_ClipboardCmd procedure} {
 } {0 {} -type}
 
 # cleanup
-::tcltest::cleanupTests
+cleanupTests
 return
-
-
-
-
-
-
-
-
-
-
-
-
-