[LON-CAPA-cvs] cvs: loncom /homework hint.pm

[albertel]

albertel		Fri Jun 20 00:16:00 2003 EDT

  Modified files:              
    /loncom/homework	hint.pm 
  Log:
  -forgot to add in the type on formulahinst and numericalhint (BUG#1350)
  
  
Index: loncom/homework/hint.pm
diff -u loncom/homework/hint.pm:1.42 loncom/homework/hint.pm:1.43
--- loncom/homework/hint.pm:1.42	Fri May  9 16:44:54 2003
+++ loncom/homework/hint.pm	Fri Jun 20 00:16:00 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # implements the tags that control the hints
 #
-# $Id: hint.pm,v 1.42 2003/05/09 20:44:54 albertel Exp $
+# $Id: hint.pm,v 1.43 2003/06/20 04:16:00 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -157,6 +157,11 @@
 	foreach my $key (keys(%Apache::inputtags::params)) {
 	    $expression.= ';my $'. #'
 		$key.'="'.$Apache::inputtags::params{$key}.'"';
+	}
+	if ($$tagstack[-1] eq 'formulahint') {
+	    $expression.=';my $type="fml";';
+	} elsif ($$tagstack[-1] eq 'numericalhint') {
+	    $expression.=';my $type="float";';
 	}
 	$expression.="');";
 	$result = &Apache::run::run($expression,$safeeval);