loncom/homework/response.pm - diff

Return to response.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.5, 2000/11/23 17:24:39	version 1.6, 2000/11/24 21:49:08
Line 1	Line 1
# The LearningOnline Network with CAPA	# The LearningOnline Network with CAPA
# various response type definitons response definition	# various response type definitons response definition

# 11/23 Gerd Kortemeyer	# 11/23,11/24 Gerd Kortemeyer

package Apache::response;	package Apache::response;
use strict;	use strict;
Line 42 sub start_responseparam {	Line 42 sub start_responseparam {
if ($token->[2]->{'description'}) {	if ($token->[2]->{'description'}) {
$display=' display="'.$token->[2]->{'description'}.'"';	$display=' display="'.$token->[2]->{'description'}.'"';
}	}
return "\n<".$tag.$display.'>'.$token->[2]->{'type'}.'</'.$tag.'>';	return "\n<".$tag.$display.'>'.$token->[2]->{'type'}.':'.
	$token->[2]->{'default'}.'</'.$tag.'>';
}	}
}	}