[LON-CAPA-cvs] cvs: loncom /publisher lonpubdir.pm

sakharuk lon-capa-cvs@mail.lon-capa.org
Fri, 05 Dec 2003 14:26:25 -0000


sakharuk		Fri Dec  5 09:26:25 2003 EDT

  Modified files:              
    /loncom/publisher	lonpubdir.pm 
  Log:
  Added &mt() function call.
  
  
Index: loncom/publisher/lonpubdir.pm
diff -u loncom/publisher/lonpubdir.pm:1.46 loncom/publisher/lonpubdir.pm:1.47
--- loncom/publisher/lonpubdir.pm:1.46	Wed Nov 19 09:57:32 2003
+++ loncom/publisher/lonpubdir.pm	Fri Dec  5 09:26:25 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construction Space Directory Lister
 #
-# $Id: lonpubdir.pm,v 1.46 2003/11/19 14:57:32 taceyjo1 Exp $
+# $Id: lonpubdir.pm,v 1.47 2003/12/05 14:26:25 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -277,7 +277,7 @@
     unless (( ($dirname eq '..') && ($reqfile eq '')) ||
 	    ($dirname eq '.')) {
 	$r->print('<tr bgcolor="#CCCCFF">'.
-		  '<td>Go to ...</td>'.
+		  '<td>'.&mt('Go to ...').'</td>'.
 		  '<td><a href="'.$here.'/'.$dirname.'/" target="_top">'.
 		  $disfilename.'</a></td>'.
 		        '<td>&nbsp;</td>'.
@@ -295,7 +295,7 @@
 	$resdir, $targetdir, $linkdir,
 	$cmtime) = @_;
 
-    my $status='Unpublished';
+    my $status=&mt('Unpublished');
     my $bgcolor='#FFCCCC';
     my $title='&nbsp;';
     if (-e $resdir.'/'.$filename) {