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

Diff for /loncom/interface/lonmeta.pm between versions 1.59 and 1.60

version 1.59, 2004/01/15 20:22:47 version 1.60, 2004/02/09 20:22:18
Line 561  ENDHEAD Line 561  ENDHEAD
        'goto','goto_list',         'goto','goto_list',
        'course','course_list') {         'course','course_list') {
   $r->print('<tr><td bgcolor="#AAAAAA">'.$lt{$_}.'</td><td bgcolor="#CCCCCC">'.    $r->print('<tr><td bgcolor="#AAAAAA">'.$lt{$_}.'</td><td bgcolor="#CCCCCC">'.
     &prettyprint($dynmeta{$_})."</td></tr>\n");      &prettyprint($_,$dynmeta{$_})."</td></tr>\n");
       }        }
       $r->print('</table>');        $r->print('</table>');
       if ($uri=~/\.(problem|exam|quiz|assess|survey|form)\.meta$/) {        if ($uri=~/\.(problem|exam|quiz|assess|survey|form)\.meta$/) {
Line 570  ENDHEAD Line 570  ENDHEAD
     '<h4>'.&mt('Assessment Statistical Data').'</h4><table cellspacing=2 border=0>');      '<h4>'.&mt('Assessment Statistical Data').'</h4><table cellspacing=2 border=0>');
   foreach ('stdno','avetries','difficulty') {    foreach ('stdno','avetries','difficulty') {
       $r->print('<tr><td bgcolor="#AAAAAA">'.$lt{$_}.'</td><td bgcolor="#CCCCCC">'.        $r->print('<tr><td bgcolor="#AAAAAA">'.$lt{$_}.'</td><td bgcolor="#CCCCCC">'.
  &prettyprint($dynmeta{$_})."</td></tr>\n");   &prettyprint($_,$dynmeta{$_})."</td></tr>\n");
   }    }
   $r->print('</table>');        $r->print('</table>');    
       }        }
       $r->print('<h4>'.&mt('Evaluation Data').'</h4><table cellspacing=2 border=0>');        $r->print('<h4>'.&mt('Evaluation Data').'</h4><table cellspacing=2 border=0>');
       foreach ('clear','depth','helpful','correct','technical') {        foreach ('clear','depth','helpful','correct','technical') {
   $r->print('<tr><td bgcolor="#AAAAAA">'.$lt{$_}.'</td><td bgcolor="#CCCCCC">'.    $r->print('<tr><td bgcolor="#AAAAAA">'.$lt{$_}.'</td><td bgcolor="#CCCCCC">'.
     &prettyprint($dynmeta{$_})."</td></tr>\n");      &prettyprint($_,$dynmeta{$_})."</td></tr>\n");
      }           }    
       $r->print('</table>');        $r->print('</table>');
       $uri=~/^\/res\/(\w+)\/(\w+)\//;         $uri=~/^\/res\/(\w+)\/(\w+)\//; 
Removed from v.1.59  
changed lines
  Added in v.1.60

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