Index: openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	17 Jun 2003 01:04:46 -0000	1.15
+++ openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	29 Jun 2003 23:32:23 -0000	1.16
@@ -115,8 +115,10 @@
         # Parse the xml document
         set tree [xml_parse -persist $catalog_file_contents]
 
+ns_log notice "Huh? tree: $tree"
         # Get the message catalog root node
         set root_node [xml_doc_get_first_node $tree]
+ns_log notice "Huh? root_node: $root_node name: [xml_node_get_name $root_node]"
         if { ![string equal [xml_node_get_name $root_node] ${MESSAGE_CATALOG_TAG}] } {
             error "lang::catalog_parse: Could not find root node ${MESSAGE_CATALOG_TAG}"
         }