Index: openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl,v
diff -u -r1.32 -r1.33
--- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	2 Nov 2008 00:21:28 -0000	1.32
+++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	16 Nov 2008 00:43:29 -0000	1.33
@@ -237,10 +237,11 @@
     } else {
       append _ [db_driverkey {}]\n
     }
-    append _ "Server:   [ns_info patchlevel] ([ns_info name])\n"
-    append _ "Tcl:      $::tcl_patchLevel\n"
-    append _ "XOTcl:    $::xotcl::version$::xotcl::patchlevel\n"
-    append _ "Tdom:     [package req tdom]\n"
+    append _ "Server:    [ns_info patchlevel] ([ns_info name])\n"
+    append _ "Tcl:       $::tcl_patchLevel\n"
+    append _ "XOTcl:     $::xotcl::version$::xotcl::patchlevel\n"
+    append _ "Tdom:      [package req tdom]\n"
+    append _ "libthread: [ns_config ns/server/[ns_info server]/modules libthread]\n"
     append _ "Tcllib: \n"
     append _ [exec sh -c "ls -ld [ns_info home]/lib/tcll*"] \n\n
     foreach pk $pkg_list {