loncom/homework/chemresponse.pm - diff

Return to chemresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/chemresponse.pm between versions 1.88 and 1.90

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

version 1.88, 2010/10/04 14:34:43	version 1.90, 2011/11/14 03:08:01
Line 337 sub end_organicresponse {	Line 337 sub end_organicresponse {

if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer' \|\|	if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer' \|\|
$target eq 'tex' \|\| $target eq 'analyze') {	$target eq 'tex' \|\| $target eq 'analyze') {
&Apache::lonxml::increment_counter(&Apache::response::repetition(),	my $repetition = &Apache::response::repetition();
"$partid.$id"); # part.response	&Apache::lonxml::increment_counter($repetition,"$partid.$id"); # part.response
if ($target eq 'analyze') {	if ($target eq 'analyze') {
$Apache::lonhomework::analyze{"$partid.$id.type"} = 'organicresponse';	$Apache::lonhomework::analyze{"$partid.$id.type"} = 'organicresponse';
push (@{ $Apache::lonhomework::analyze{"parts"} },"$partid.$id");	push (@{ $Apache::lonhomework::analyze{"parts"} },"$partid.$id");
Line 417 sub start_organicstructure {	Line 417 sub start_organicstructure {
$id=&escape($id);	$id=&escape($id);
&Apache::lonxml::register_ssi("/cgi-bin/convertjme.pl?$id");	&Apache::lonxml::register_ssi("/cgi-bin/convertjme.pl?$id");
if ($options =~ /border/) { $result.= '\fbox{'; }	if ($options =~ /border/) { $result.= '\fbox{'; }
$result .= '\graphicspath{{/home/httpd/perl/tmp/}}\includegraphics[width='.$texwidth.' mm]{'.$filename.'.eps}';	$result .= '\graphicspath{{'.LONCAPA::tempdir().
	'}}\includegraphics[width='.$texwidth.' mm]{'.$filename.'.eps}';
if ($options =~ /border/) { $result.= '} '; }	if ($options =~ /border/) { $result.= '} '; }
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result .=&Apache::edit::tag_start($target,$token);	$result .=&Apache::edit::tag_start($target,$token);
Line 598 sub end_reactionresponse {	Line 599 sub end_reactionresponse {

if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer' \|\|	if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer' \|\|
$target eq 'tex' \|\| $target eq 'analyze') {	$target eq 'tex' \|\| $target eq 'analyze') {
&Apache::lonxml::increment_counter(&Apache::response::repetition(), "$partid.$id");	my $repetition = &Apache::response::repetition();
	&Apache::lonxml::increment_counter($repetition,"$partid.$id");
if ($target eq 'analyze') {	if ($target eq 'analyze') {
$Apache::lonhomework::analyze{"$partid.$id.type"} = 'reactionresponse';	$Apache::lonhomework::analyze{"$partid.$id.type"} = 'reactionresponse';
push (@{ $Apache::lonhomework::analyze{"parts"} },"$partid.$id");	push (@{ $Apache::lonhomework::analyze{"parts"} },"$partid.$id");

Removed from v.1.88
changed lines
	Added in v.1.90