--- loncom/publisher/lonpubdir.pm 2003/09/25 22:30:06 1.40
+++ loncom/publisher/lonpubdir.pm 2003/10/04 20:49:40 1.42
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Construction Space Directory Lister
#
-# $Id: lonpubdir.pm,v 1.40 2003/09/25 22:30:06 www Exp $
+# $Id: lonpubdir.pm,v 1.42 2003/10/04 20:49:40 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -282,7 +282,7 @@ sub putdirectory {
$disfilename.''.
'
| '.
' | '.
- ''.localtime($modtime).' | '.
+ ''.&Apache::lonlocal::locallocaltime($modtime).' | '.
"\n");
}
return OK;
@@ -304,28 +304,28 @@ sub putresource {
$ratime,$rmtime,$rctime,
$rblksize,$rblocks)=stat($resdir.'/'.$filename);
if ($rmtime>=$cmtime) {
- $status='Published';
+ $status=&mt('Published');
$bgcolor='#CCFFCC';
if (&Apache::lonnet::metadata($targetdir.'/'.$filename,'obsolete')) {
- $status='Obsolete';
+ $status=&mt('Obsolete');
$bgcolor='#AAAAAA';
}
$title=''.
getTitleString($targetdir.'/'.$filename, 'title').'';
} else {
- $status='Modified';
+ $status=&mt('Modified');
$bgcolor='#FFFFCC';
$title=''.
getTitleString($targetdir.'/'.$filename,'title').'';
if (&Apache::loncommon::fileembstyle(($filename=~/\.(\w+)$/)) eq 'ssi') {
$status.='
Diffs';
+ '&versiontwo=priv" target=cat>'.&mt('Diffs').'';
}
}
$status.='
Retrieve';
+ $thisdisfn.'/'.$filename.'" target=cat>'.&mt('Retrieve').'';
}
my $editlink='';
my $editlink2='';
@@ -345,8 +345,8 @@ sub putresource {
$filename.''.$editlink2.$editlink.
''.
''.$title.' | '.
- ''.&mt($status).' | '.
- ''.localtime($cmtime).' | '.
+ ''.$status.' | '.
+ ''.&Apache::lonlocal::locallocaltime($cmtime).' | '.
"\n");
return OK;
}