\n";

if (preg_match_all("#^$(.*?)^<\/root>$#sim",$sessions_log,$matches)) {
//if (preg_match_all("#^$(.*?)^<\/clog_session>$#sim",$sessions_log,$matches)) {

      foreach ($matches[0] as $clog_xml) {
$clog_xml=simplexml_load_string($clog_xml); // or die("Error: Cannot create object $ xml course details"    );
//if (preg_match_all("#^".$mdlid."<\/mdlid>$#sim",$sessions_log,$matches)) {
//if (preg_match_all("#^".$mdlid."<\/mdlid>$#sim",$clog_xml,$matches)) {
//if ($clog_xml->clog_session->clog_activity->mdlid = $mdlid) {

//foreach ($clog_xml->clog_session->clog_support_material->clog_activity as $clog_activity) // fails
foreach ($clog_xml->clog_session as $clog_session) {
foreach ($clog_session->clog_support_material as $clog_support_material) {
foreach ($clog_support_material->clog_activity as $clog_activity) {

if (($clog_activity->mdlid == $mdlid)
    && ($clog_activity->activity_status != "wip")) {

include ('inc/xml4t_activity_types_mdlid.php');

}
} //foreach ($clog_support_material->clog_activity as $clog_activity) 
} // foreach ($clog_session->clog_support_material as $clog_support_material)
} // foreach ($clog_xml->clog_session as $clog_session)

include ('sbook_plugins/wordlist_selection_from_xml_course_log_mdl.inc'); // mdl only!
include ('inc/xml4t_new_expressions_mdl.php');
include ('inc/xml4t_deco_favourite_mistakes.php'); // needs updating per different mdlid?

} // foreach ($matches[0] as $clog_xml)
} // if (preg_match_all("#^$(.*?)^<\/root>$#sim",$sessions_log,$matches))

echo "