$OpenBSD: patch-library_tm_tcl,v 1.2 2013/09/22 10:33:13 stu Exp $
--- library/tm.tcl.orig	Tue Sep 17 08:14:11 2013
+++ library/tm.tcl	Tue Sep 17 20:54:45 2013
@@ -316,10 +316,13 @@ proc ::tcl::tm::Defaults {} {
 
     # Note that we're using [::list], not [list] because [list] means
     # something other than [::list] in this namespace.
-    roots [::list \
-	    [file dirname [info library]] \
-	    [file join [file dirname [file dirname $exe]] lib] \
-	    ]
+
+    # OpenBSD layout
+    foreach dir [::list [info library] [file dirname [info library]]] {
+	foreach ver [::list [info tclversion] 8.5] {
+	    add [file join $dir modules $ver]
+	}
+    }
 
     if {$tcl_platform(platform) eq "windows"} {
 	set sep ";"
