--- loncom/homework/response.pm 2008/09/09 13:56:48 1.203
+++ loncom/homework/response.pm 2008/11/24 16:53:26 1.207
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# various response type definitons response definition
#
-# $Id: response.pm,v 1.203 2008/09/09 13:56:48 riegler Exp $
+# $Id: response.pm,v 1.207 2008/11/24 16:53:26 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -217,23 +217,26 @@ sub meta_stores_write {
}
sub mandatory_part_meta {
-#
-# Autogenerate metadata for mandatory
-# input (from RAT or lonparmset) and
-# output (to lonspreadsheet)
-# of each part
+=pod
+
+=item meta_part_order
+
+Autogenerate metadata for mandatory
+input (from RAT or lonparmset) and
+output (to lonspreadsheet)
+of each part
#
return
-# &meta_parameter_write('opendate','date_start','',
-# 'Opening Date').
-# &meta_parameter_write('duedate','date_end','',
-# 'Due Date').
-# &meta_parameter_write('answerdate','date_start','',
-# 'Show Answer Date').
-# &meta_parameter_write('weight','int_zeropos','',
-# 'Available Points').
-# &meta_parameter_write('maxtries','int_pos','',
-# 'Maximum Number of Tries').
+ &meta_parameter_write('opendate','date_start','',
+ 'Opening Date').
+ &meta_parameter_write('duedate','date_end','',
+ 'Due Date').
+ &meta_parameter_write('answerdate','date_start','',
+ 'Show Answer Date').
+ &meta_parameter_write('weight','int_zeropos','',
+ 'Available Points').
+ &meta_parameter_write('maxtries','int_pos','',
+ 'Maximum Number of Tries').
&meta_package_write('part').
&meta_stores_write('solved','string',
'Problem Status').
@@ -241,10 +244,12 @@ sub mandatory_part_meta {
'Number of Attempts').
&meta_stores_write('awarded','float',
'Partial Credit Factor');
-#
-# Note: responseid-specific data 'submission' and 'awarddetail'
-# not available to spreadsheet -> skip here
-#
+
+Note: responseid-specific data 'submission' and 'awarddetail'
+not available to spreadsheet -> skip here
+
+=cut
+
}
sub meta_part_order {
@@ -575,7 +580,7 @@ sub end_mathresponse {
my $partid = $Apache::inputtags::part;
my $id = $Apache::inputtags::response[-1];
if (($Apache::inputtags::status['-1'] eq 'CAN_ANSWER')
- && (&Apache::lonnet::EXT('resource.'.$partid.'_'.$id.'.turnoneditor') ne 'no')) {
+ && (&Apache::lonnet::EXT('resource.'.$partid.'_'.$id.'.turnoffeditor') ne 'yes')) {
$result.=&edit_mathresponse_button($id,"HWVAL_$id");
}
}
@@ -680,7 +685,7 @@ sub start_responseparam {
}
}
if (defined($optionlist)) {
- $result.='Use template:
';
}
@@ -1192,7 +1197,7 @@ sub submitted {
}
# Submit All button on a .page was pressed
if (defined($env{'form.all_submit'})) { return 1; }
- # otherwise no submission occured
+ # otherwise no submission occurred
return 0;
}