--- loncom/publisher/lonpubdir.pm 2004/01/05 22:13:16 1.56
+++ loncom/publisher/lonpubdir.pm 2004/01/15 20:22:47 1.58
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Construction Space Directory Lister
#
-# $Id: lonpubdir.pm,v 1.56 2004/01/05 22:13:16 albertel Exp $
+# $Id: lonpubdir.pm,v 1.58 2004/01/15 20:22:47 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -284,9 +284,9 @@ sub putdirectory {
'
| '.
''.&mt('Go to ...').' | '.
- ''.
+ ' | '.
$disfilename.' | '.
- ''.($kaputt?'':'').$Apache::lonpublisher::metadatafields{'title'}.' '.
+ ' | '.($kaputt?&Apache::lonhtmlcommon::authorbombs($resdir.'/'.$disfilename.'/'):'').$Apache::lonpublisher::metadatafields{'title'}.' '.
$Apache::lonpublisher::metadatafields{'subject'}.' '.
$Apache::lonpublisher::metadatafields{'keywords'}.' | '.
''.&Apache::lonlocal::locallocaltime($modtime).' | '.
@@ -328,7 +328,7 @@ sub putresource {
$title=''.
&getTitleString($targetdir.'/'.$filename).'';
if (&Apache::loncommon::fileembstyle(($filename=~/\.(\w+)$/)) eq 'ssi') {
- $status.='
'.&mt('Diffs').'';
}
@@ -357,7 +357,7 @@ sub putresource {
''.&mt('Publish').''.
' | '.
- ''.
+ ' | '.
''.
$filename.''.$editlink2.$editlink.
' | '.