Index: openacs-4/packages/acs-tcl/tcl/30-xml-utils-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/30-xml-utils-procs.tcl,v diff -u -r1.12.2.2 -r1.12.2.3 --- openacs-4/packages/acs-tcl/tcl/30-xml-utils-procs.tcl 24 May 2019 15:43:42 -0000 1.12.2.2 +++ openacs-4/packages/acs-tcl/tcl/30-xml-utils-procs.tcl 24 May 2019 15:44:01 -0000 1.12.2.3 @@ -20,13 +20,13 @@ @return boolean } { upvar $varname xml_status_msg - + set ok_p 1 if {[llength [info commands tdom]] < 1} { set xml_status_msg "tDOM is not installed! You must have tDOM installed, or nothing will work." set ok_p 0 - } + } return $ok_p }