--- loncom/publisher/lonpubdir.pm 2011/10/31 17:27:10 1.135
+++ loncom/publisher/lonpubdir.pm 2011/11/23 19:13:01 1.138
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Construction Space Directory Lister
#
-# $Id: lonpubdir.pm,v 1.135 2011/10/31 17:27:10 raeburn Exp $
+# $Id: lonpubdir.pm,v 1.138 2011/11/23 19:13:01 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -145,7 +145,7 @@ sub startpage {
&Apache::lonhtmlcommon::clear_breadcrumbs();
&Apache::lonhtmlcommon::add_breadcrumb({
'text' => 'Construction Space',
- 'href' => &Apache::loncommon::authorspace(),
+ 'href' => &Apache::loncommon::authorspace($formaction),
});
# breadcrumbs (and tools) will be created
# in start_page->bodytag->innerregister
@@ -603,11 +603,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').')';
+ if ($filename=~/$LONCAPA::assess_re/) {
+ $editlink=' ('.&mt('EditXML').')';
+ $editlink2='
('.&mt('Edit').')';
}
if ($filename=~/\.(problem|exam|quiz|assess|survey|form|library|xml|html|htm|xhtml|xhtm|sty)$/) {
$editlink.=' ('.&mt('Clean Up').')';