--- loncom/xml/lonxml.pm	2001/07/12 15:26:03	1.101
+++ loncom/xml/lonxml.pm	2001/07/12 15:53:44	1.102
@@ -513,6 +513,7 @@ sub init_safespace {
   $safeeval->permit(":base_math");
   $safeeval->permit("sort");
   $safeeval->deny(":base_io");
+  $safehole->wrap(\&Apache::scripttag::xmlparse,$safeeval,'&xmlparse');
   $safehole->wrap(\&Apache::lonnet::EXT,$safeeval,'&EXT');
   
   $safehole->wrap(\&Math::Cephes::asin,$safeeval,'&asin');