$OpenBSD: patch-support_devel_sak_test_run_tcl,v 1.2 2011/01/05 16:27:24 stu Exp $
--- support/devel/sak/test/run.tcl.orig	Mon Dec  7 09:56:49 2009
+++ support/devel/sak/test/run.tcl	Mon Oct  4 15:41:21 2010
@@ -684,6 +684,7 @@ proc ::sak::test::run::SetupError {} {
 # ###
 
 proc ::sak::test::run::+= {string} {
+return
     variable araw
     if {$araw} return
     variable aprefix
@@ -693,6 +694,7 @@ proc ::sak::test::run::+= {string} {
 }
 
 proc ::sak::test::run::= {string} {
+return
     variable araw
     if {$araw} return
     variable aprefix
@@ -701,6 +703,7 @@ proc ::sak::test::run::= {string} {
 }
 
 proc ::sak::test::run::=| {string} {
+return
     variable araw
     if {$araw} return
     variable aprefix
