apm_load_xml_packages

apm_load_xml_packages

Loads XML packages into the running interpreter, if they're not already there. We need to load these packages once per connection, since AOLserver doesn't seem to deal with packages very well.

Source code:

    global ad_conn
    if { ![info exists ad_conn(xml_loaded_p)] } {
	foreach file [glob "[acs_package_root_dir acs-core]/xml-*-procs.tcl"] {
	    apm_source $file
	}
	set ad_conn(xml_loaded_p) 1
    }

    package require xml 1.9