[LON-CAPA-cvs] cvs: loncom /xml londefdef.pm

[albertel]

albertel		Thu Nov  3 16:42:15 2005 EDT

  Modified files:              
    /loncom/xml	londefdef.pm 
  Log:
  - support <link> more explicitly (currently requires an <allow>)
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.290 loncom/xml/londefdef.pm:1.291
--- loncom/xml/londefdef.pm:1.290	Tue Oct 18 17:46:19 2005
+++ loncom/xml/londefdef.pm	Thu Nov  3 16:42:15 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.290 2005/10/18 21:46:19 albertel Exp $
+# $Id: londefdef.pm,v 1.291 2005/11/03 21:42:15 albertel Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -3459,6 +3459,9 @@
     my ($target,$token) = @_;
     my $currentstring = '';
     if ($target eq 'web') {
+	my $href=&Apache::lonxml::get_param('href',$parstack,$safeeval,
+					    undef,1);
+	&Apache::lonxml::extlink($href);
 	$currentstring = $token->[4];     
     } 
     return $currentstring;