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

sakharuk lon-capa-cvs@mail.lon-capa.org
Tue, 26 Feb 2002 22:27:22 -0000


sakharuk		Tue Feb 26 17:27:22 2002 EDT

  Modified files:              
    /loncom/xml	londefdef.pm 
  Log:
  fixed token in <insert
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.45 loncom/xml/londefdef.pm:1.46
--- loncom/xml/londefdef.pm:1.45	Tue Feb 26 17:20:43 2002
+++ loncom/xml/londefdef.pm	Tue Feb 26 17:27:22 2002
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.45 2002/02/26 22:20:43 sakharuk Exp $
+# $Id: londefdef.pm,v 1.46 2002/02/26 22:27:22 sakharuk Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -1511,10 +1511,11 @@
 	}
 #-- <insert>
 	sub start_insert {
-	    my ($target,$token) = @_;
+	    my ($target,$token,$tagstack,$parstack,$parser,$safeeval) = @_;
             my $currentstring = '';
             if ($target eq 'web') {
-	       $currentstring .= '<b>'.$token->[2]->{'display'}.'</b>';;
+		my $display = &Apache::lonxml::get_param('display',$parstack,$safeeval);
+	       $currentstring .= '<b>'.$display.'</b>';;
 	    }
            return $currentstring;
 	}