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

Diff for /loncom/interface/lonmeta.pm between versions 1.92 and 1.93

version 1.92, 2005/02/17 08:29:43 version 1.93, 2005/03/16 22:52:04
Line 237  sub diffgraph { Line 237  sub diffgraph {
 # The field names  # The field names
 sub fieldnames {  sub fieldnames {
     my $file_type=shift;      my $file_type=shift;
     if ($file_type eq 'portfolio') {      my %fields = 
     return &Apache::lonlocal::texthash          ('title' => 'Title',
         (  
          'title' => 'Title',  
          'author' =>'Author(s)',           'author' =>'Author(s)',
          'authorspace' => 'Author Space',           'authorspace' => 'Author Space',
          'modifyinguser' => 'Last Modifying User',           'modifyinguser' => 'Last Modifying User',
Line 250  sub fieldnames { Line 248  sub fieldnames {
          'abstract' => 'Abstract',           'abstract' => 'Abstract',
          'lowestgradelevel' => 'Lowest Grade Level',           'lowestgradelevel' => 'Lowest Grade Level',
          'highestgradelevel' => 'Highest Grade Level');           'highestgradelevel' => 'Highest Grade Level');
     } else {      if (! defined($file_type) || $file_type ne 'portfolio') {
     return &Apache::lonlocal::texthash          %fields = 
         (          (%fields,
          'title' => 'Title',           'domain' => 'Domain',
          'author' =>'Author(s)',  
          'authorspace' => 'Author Space',  
          'modifyinguser' => 'Last Modifying User',  
          'subject' => 'Subject',  
          'keywords' => 'Keyword(s)',  
          'notes' => 'Notes',  
          'abstract' => 'Abstract',  
          'lowestgradelevel' => 'Lowest Grade Level',  
          'highestgradelevel' => 'Highest Grade Level',  
          'standards' => 'Standards',           'standards' => 'Standards',
          'mime' => 'MIME Type',           'mime' => 'MIME Type',
          'language' => 'Language',           'language' => 'Language',
Line 295  sub fieldnames { Line 284  sub fieldnames {
          'disc'       => 'Degree of discrimination',           'disc'       => 'Degree of discrimination',
  'dependencies' => 'Resources used by this resource',   'dependencies' => 'Resources used by this resource',
          );           );
         }      }
       return &Apache::lonlocal::texthash(%fields);
 }  }
   
 # Pretty printing of metadata field  # Pretty printing of metadata field
Removed from v.1.92  
changed lines
  Added in v.1.93

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