--- loncom/publisher/lonpubdir.pm 2004/01/03 15:11:37 1.53
+++ loncom/publisher/lonpubdir.pm 2004/01/03 15:57:11 1.54
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Construction Space Directory Lister
#
-# $Id: lonpubdir.pm,v 1.53 2004/01/03 15:11:37 www Exp $
+# $Id: lonpubdir.pm,v 1.54 2004/01/03 15:57:11 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -281,8 +281,8 @@ sub putdirectory {
'
| '.
''.&mt('Go to ...').' | '.
- ''.
- $disfilename.' | '.
+ ''.
+ $disfilename.' | '.
''.($kaputt?'':'').$Apache::lonpublisher::metadatafields{'title'}.' '.
$Apache::lonpublisher::metadatafields{'subject'}.' '.
$Apache::lonpublisher::metadatafields{'keywords'}.' | '.
@@ -336,11 +336,11 @@ sub putresource {
my $editlink='';
my $editlink2='';
if ($filename=~/\.(xml|html|htm|xhtml|xhtm|sty)$/) {
- $editlink=' ('.&mt('Edit').')';
+ $editlink='
('.&mt('Edit').')';
}
if ($filename=~/\.(problem|exam|quiz|assess|survey|form|library)$/) {
$editlink=' ('.&mt('EditXML').')';
- $editlink2=' ('.&mt('Edit').')';
+ $editlink2='
('.&mt('Edit').')';
}
if ($filename=~/\.(zip|tar|bz2|gz|tar.gz|tar.bz2|tgz)$/) {
$editlink=' ('.&mt('Publish').''.
''.
- ''.
+ ' | '.
''.
- $filename.''.$editlink2.$editlink.
+ $filename.''.$editlink2.$editlink.
' | '.
''.$title.' | '.
''.$status.' | '.