$OpenBSD: patch-support_devel_all_tcl,v 1.4 2012/03/09 14:15:32 stu Exp $
--- support/devel/all.tcl.orig	Tue Dec 13 13:13:22 2011
+++ support/devel/all.tcl	Mon Feb 20 18:07:35 2012
@@ -98,6 +98,7 @@ if {[catch {::tcltest::normalizePath ::tcltest::testsD
 set root $::tcltest::testsDirectory
 
 proc Note {k v} {
+return
     puts  stdout [list @@ $k $v]
     flush stdout
     return
@@ -196,7 +197,7 @@ foreach module $modules {
 	set ::tcltest::testsDirectory [pSet ::tcltest::testsDirectory]
 
 	# configure not present in tcltest 1.x
-	if {[catch {::tcltest::configure -verbose bstep}]} {
+	if {[catch {::tcltest::configure -verbose {be}}]} {
 	    set ::tcltest::verbose psb
 	}
     }