Diff for /loncom/interface/courseprefs.pm between versions 1.36 and 1.38

version 1.36, 2010/12/24 16:50:38 version 1.38, 2010/12/24 17:17:33
Line 1901  sub print_courseinfo { Line 1901  sub print_courseinfo {
             my $showreqd;              my $showreqd;
             if ($loncaparev) {              if ($loncaparev) {
                 $showreqd = &mt('[_1] or newer',$loncaparev).' <a href="javascript:loncaparevinfo()">'.                  $showreqd = &mt('[_1] or newer',$loncaparev).' <a href="javascript:loncaparevinfo()">'.
                             &mt('Details').'</a>',                              &mt('Details').'</a>';
             } else {              } else {
                 $showreqd = &mt('No specific version required');                  $showreqd = &mt('No specific version required');
             }              }
Line 2072  sub display_loncaparev_constraints { Line 2072  sub display_loncaparev_constraints {
     my (%checkparms,%checkresponsetypes,%checkcrstypes,%anonsurvey,%randomizetry);      my (%checkparms,%checkresponsetypes,%checkcrstypes,%anonsurvey,%randomizetry);
     &Apache::loncommon::build_release_hashes(\%checkparms,\%checkresponsetypes,      &Apache::loncommon::build_release_hashes(\%checkparms,\%checkresponsetypes,
                                               \%checkcrstypes,\%anonsurvey,\%randomizetry);                                                \%checkcrstypes,\%anonsurvey,\%randomizetry);
   
 #    my %paramstrings =    
 #       ('string_questiontype' =>   
 #                                  [[ 'anonsurveycred', 'Anonymous Survey'],  
 #                                   [ 'anonsurvey', 'Anonymous Survey'],  
 #                                   [ 'randomizetry', 'New Randomization Each N Tries']]  
 #       );  
     if (defined($checkcrstypes{$crstype})) {      if (defined($checkcrstypes{$crstype})) {
         $output .= '<h4>'.&mt('Course type: [_1] requires [_2] or newer',$crstype,          $output .= '<h4>'.&mt('Course type: [_1] requires [_2] or newer',$crstype,
                               $checkcrstypes{$crstype}).'</h4>';                                $checkcrstypes{$crstype}).'</h4>';

Removed from v.1.36  
changed lines
  Added in v.1.38


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