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

albertel lon-capa-cvs@mail.lon-capa.org
Wed, 19 Jan 2005 18:20:12 -0000


albertel		Wed Jan 19 13:20:12 2005 EDT

  Modified files:              
    /loncom/xml	londefdef.pm 
  Log:
  - - fix incorrect code for handling encrypturled <param name="cabbase" value="" />
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.250 loncom/xml/londefdef.pm:1.251
--- loncom/xml/londefdef.pm:1.250	Wed Jan 19 13:16:35 2005
+++ loncom/xml/londefdef.pm	Wed Jan 19 13:20:12 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.250 2005/01/19 18:16:35 albertel Exp $
+# $Id: londefdef.pm,v 1.251 2005/01/19 18:20:12 albertel Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -2757,7 +2757,10 @@
 	if ($src) { $toconvert{'src'}= $src; }
 	my $name=&Apache::lonxml::get_param('name',$parstack,$safeeval,
 					    undef,1);
-	if ($name=~/^cabbase$/i) { $toconvert{'name'}= $name; }	
+	if ($name=~/^cabbase$/i) {
+	    $toconvert{'value'}=&Apache::lonxml::get_param('value',$parstack,
+							   $safeeval,undef,1);
+	}
 	$currentstring = &Apache::lonenc::encrypt_ref($token,\%toconvert);
     } elsif ($target eq 'tex') {
     }