--- loncom/xml/lonxml.pm	2000/09/19 18:05:21	1.20
+++ loncom/xml/lonxml.pm	2000/09/19 19:10:01	1.21
@@ -42,7 +42,8 @@ sub xmlparse {
  $safeeval->deny(":base_io");
 #need to inspect this class of ops
 # $safeeval->deny(":base_orig");
- if ( $safeinit ne '') {&Apache::run::run($safeinit,$safeeval);}
+ $safeinit .= ';$external::target='.$target.';';
+ &Apache::run::run($safeinit,$safeeval);
 #-------------------- Redefinition of the target in the case of compound target
 
  ($target, my @tenta) = split('&&',$target);