--- loncom/publisher/lonpubdir.pm 2004/01/06 02:15:12 1.57
+++ loncom/publisher/lonpubdir.pm 2004/01/29 00:44:43 1.59
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Construction Space Directory Lister
#
-# $Id: lonpubdir.pm,v 1.57 2004/01/06 02:15:12 www Exp $
+# $Id: lonpubdir.pm,v 1.59 2004/01/29 00:44:43 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -222,8 +222,15 @@ ENDPUBDIRSCRIPT
$r->print('
'.&mt('Co-Author').': '.$uname.' at '.$udom.
'
');
}
- $r->print(
- &Apache::lonhtmlcommon::crumbs($uname.'/'.$thisdisfn.'/','_top','/priv').'
');
+ my $formaction='/priv/'.$uname.'/'.$thisdisfn.'/';
+ $formaction=~s/\/+/\//g;
+ $r->print('');
+ &Apache::lonhtmlcommon::store_recent('construct',$formaction,$formaction);
}
#
@@ -286,7 +293,7 @@ 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).' | '.