[BACK]Return to lonproblemanalysis.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface / statistics

Diff for /loncom/interface/statistics/lonproblemanalysis.pm between versions 1.50 and 1.52

version 1.50, 2003/12/10 23:09:26 version 1.52, 2003/12/15 16:23:00
Line 1403  sub CreateInterface { Line 1403  sub CreateInterface {
     { # These braces are here to organize the code, not scope it.      { # These braces are here to organize the code, not scope it.
         {          {
             $Str .= '<nobr>'.&mt('Analyze Over ');              $Str .= '<nobr>'.&mt('Analyze Over ');
               $Str .= &Apache::loncommon::help_open_topic
                                                     ('Analysis_Analyze_Over');
             $Str .='<select name="AnalyzeOver" >';              $Str .='<select name="AnalyzeOver" >';
             $Str .= '<option value="Tries" ';              $Str .= '<option value="Tries" ';
             if (! exists($ENV{'form.AnalyzeOver'}) ||               if (! exists($ENV{'form.AnalyzeOver'}) || 
Line 1414  sub CreateInterface { Line 1416  sub CreateInterface {
             $Str .= '<option value="Time" ';              $Str .= '<option value="Time" ';
             $Str .= ' selected ' if ($ENV{'form.AnalyzeOver'} eq 'Time');              $Str .= ' selected ' if ($ENV{'form.AnalyzeOver'} eq 'Time');
             $Str .= '>'.&mt('Time').'</option>';              $Str .= '>'.&mt('Time').'</option>';
             $Str .= '</select></nobr><br />';              $Str .= '</select>';
               $Str .= '</nobr><br />';
         }          }
         {          {
             $Str .= '<nobr>'.&mt('Analyze as ');              $Str .= '<nobr>'.&mt('Analyze as ');
               $Str .= &Apache::loncommon::help_open_topic
                                                     ('Analysis_Analyze_as');
             $Str .='<select name="AnalyzeAs" >';              $Str .='<select name="AnalyzeAs" >';
             $Str .= '<option value="Concepts" ';              $Str .= '<option value="Concepts" ';
             if (! exists($ENV{'form.AnalyzeAs'}) ||               if (! exists($ENV{'form.AnalyzeAs'}) || 
Line 1433  sub CreateInterface { Line 1438  sub CreateInterface {
         }          }
         {          {
             $Str .= '<br /><nobr>'.&mt('Number of Plots:');              $Str .= '<br /><nobr>'.&mt('Number of Plots:');
               $Str .= &Apache::loncommon::help_open_topic
                                                     ('Analysis_num_plots');
             $Str .= '<select name="NumPlots">';              $Str .= '<select name="NumPlots">';
             if (! exists($ENV{'form.NumPlots'})               if (! exists($ENV{'form.NumPlots'}) 
                 || $ENV{'form.NumPlots'} < 1                   || $ENV{'form.NumPlots'} < 1 
Removed from v.1.50  
changed lines
  Added in v.1.52

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