[LON-CAPA-cvs] cvs: loncom /interface/statistics lonproblemstatistics.pm

matthew lon-capa-cvs@mail.lon-capa.org
Tue, 11 Jan 2005 19:45:18 -0000


matthew		Tue Jan 11 14:45:18 2005 EDT

  Modified files:              
    /loncom/interface/statistics	lonproblemstatistics.pm 
  Log:
  Added problem weight output for research.
  
  
Index: loncom/interface/statistics/lonproblemstatistics.pm
diff -u loncom/interface/statistics/lonproblemstatistics.pm:1.95 loncom/interface/statistics/lonproblemstatistics.pm:1.96
--- loncom/interface/statistics/lonproblemstatistics.pm:1.95	Wed Oct 27 14:17:43 2004
+++ loncom/interface/statistics/lonproblemstatistics.pm	Tue Jan 11 14:45:18 2005
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonproblemstatistics.pm,v 1.95 2004/10/27 18:17:43 matthew Exp $
+# $Id: lonproblemstatistics.pm,v 1.96 2005/01/11 19:45:18 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -353,6 +353,17 @@
 #             selectable => 'no',
 #             defaultselected => 'yes',
 #            },
+##   weight included for research purposes.  Commented out most of the time.
+#           { name => 'weight',
+#             title => 'weight',
+#             align => 'right',
+#             color => '#FFFFFF',
+#             sortable => 'no',
+#             graphable => 'no',
+#             long_title => 'Problem weight (for instructor)',
+#             selectable => 'no',
+#             defaultselected => 'yes',
+#            },
 );
 
 my @SeqFields = (
@@ -1587,6 +1598,8 @@
 #        &Apache::lonnet::EXT('resource.'.$part.'.maxtries',$symb);
 #    $data->{'hinttries'} =
 #        &Apache::lonnet::EXT('resource.'.$part.'.hinttries',$symb);
+#    $data->{'weight'} =
+#        &Apache::lonnet::EXT('resource.'.$part.'.weight',$symb);
 #    $data->{'resptypes'} = join(',',@{$resource->{'partdata'}->{$part}->{'ResponseTypes'}});
     return $data;
 }