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

Diff for /loncom/interface/lonmeta.pm between versions 1.82 and 1.83

version 1.82, 2004/06/17 18:22:13 version 1.83, 2004/06/17 20:43:04
Line 71  sub get_dynamic_metadata_from_sql { Line 71  sub get_dynamic_metadata_from_sql {
     if (! defined($authordom) || ! defined($author)) {      if (! defined($authordom) || ! defined($author)) {
         return ();          return ();
     }      }
     my @Fields = ('url',      my @Fields = ('url','count','course',
                   'goto','goto_list',                    'goto','goto_list',
                   'comefrom','comefrom_list',                    'comefrom','comefrom_list',
                   'sequsage','sequsage_list',                    'sequsage','sequsage_list',
                   'stdno','stdno_list',                    'stdno','stdno_list',
     'dependencies',
                   'avetries','avetries_list',                    'avetries','avetries_list',
                   'difficulty','difficulty_list',                    'difficulty','difficulty_list',
                   'disc','disc_list',                    'disc','disc_list',
Line 277  sub fieldnames { Line 278  sub fieldnames {
          'stdno'      => 'Total number of students who have worked on this problem',           'stdno'      => 'Total number of students who have worked on this problem',
          'difficulty' => 'Degree of difficulty',           'difficulty' => 'Degree of difficulty',
          'disc'       => 'Degree of discrimination',           'disc'       => 'Degree of discrimination',
    'dependencies' => 'Resources used by this resource',
          );           );
 }  }
   
Line 339  sub prettyprint { Line 341  sub prettyprint {
  ($type eq 'goto_list') ||   ($type eq 'goto_list') ||
  ($type eq 'comefrom_list') ||   ($type eq 'comefrom_list') ||
  ($type eq 'sequsage_list') ||   ($type eq 'sequsage_list') ||
  ($type eq 'linkto_list')) {   ($type eq 'dependencies')) {
  return '<ul><font size="-1">'.join("\n",map {   return '<ul><font size="-1">'.join("\n",map {
             my $url = &Apache::lonnet::clutter($_);              my $url = &Apache::lonnet::clutter($_);
             my $title = &Apache::lonnet::gettitle($url);              my $title = &Apache::lonnet::gettitle($url);
Removed from v.1.82  
changed lines
  Added in v.1.83

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