--- loncom/interface/lonmeta.pm	2003/09/25 22:30:06	1.36
+++ loncom/interface/lonmeta.pm	2003/09/27 13:20:46	1.37
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Metadata display handler
 #
-# $Id: lonmeta.pm,v 1.36 2003/09/25 22:30:06 www Exp $
+# $Id: lonmeta.pm,v 1.37 2003/09/27 13:20:46 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -401,7 +401,8 @@ $dynmeta{$_}."&nbsp;</td></tr>\n");
   '<h4>'.&mt('Evaluation Comments').' ('.&mt('visible to author and co-authors only').')</h4>'.
       '<blockquote>'.$dynmeta{'comments'}.'</blockquote>');
       $r->print(
-   '<h4>Error Messages (visible to author and co-authors only)</h4>');
+   '<h4>'.&mt('Error Messages').' ('.
+          &mt('visible to author and co-authors only').')</h4>');
       my %errormsgs=&Apache::lonnet::dump('nohist_res_msgs',$1,$2);
       foreach (keys %errormsgs) {
 	if ($_=~/^\Q$disuri\E\_\d+$/) {
@@ -454,7 +455,8 @@ $dynmeta{$_}."&nbsp;</td></tr>\n");
   if ($disuri=~/\/default$/) {
       my $dir=$disuri;
       $dir=~s/default$//;
-      $displayfile='Default Cataloging Information for Directory '.$dir;
+      $displayfile=&mt('Default Cataloging Information for Directory').' '.
+	  $dir;
   }
   %Apache::lonpublisher::metadatafields=();
   %Apache::lonpublisher::metadatakeys=();
@@ -466,7 +468,8 @@ $bodytag
 <form method="post">
 ENDEDIT
    foreach ('author','title','subject','keywords','abstract','notes',
-            'copyright','customdistributionfile','language') {
+            'copyright','customdistributionfile','language',
+            'obsolete','obsoletereplacement') {
        if ($ENV{'form.new_'.$_}) {
 	   $Apache::lonpublisher::metadatafields{$_}=$ENV{'form.new_'.$_};
        }
@@ -489,7 +492,8 @@ ENDEDIT
       my $mfh;
       unless ($mfh=Apache::File->new('>'.$fn)) {
             $r->print(
-            '<p><font color=red>Could not write metadata, FAIL</font>');
+            '<p><font color=red>'.&mt('Could not write metadata').', '.
+		      &mt('FAIL').'</font>');
       } else {
           foreach (sort keys %Apache::lonpublisher::metadatafields) {
             unless ($_=~/\./) {
@@ -510,11 +514,12 @@ ENDEDIT
                         .'</'.$tag.'>';
             }
 	  }
-          $r->print('<p>Wrote Metadata');
+          $r->print('<p>'.&mt('Wrote Metadata'));
       }
     }
     $r->print(
- '<br /><input type="submit" name="store" value="Store Catalog Information"></form></body></html>');
+ '<br /><input type="submit" name="store" value="'.
+&mt('Store Catalog Information').'"></form></body></html>');
     return OK;
   }
 }