--- loncom/publisher/lonpubdir.pm 2015/06/18 20:19:27 1.164 +++ loncom/publisher/lonpubdir.pm 2016/06/10 22:31:34 1.168 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Authoring Space Directory Lister # -# $Id: lonpubdir.pm,v 1.164 2015/06/18 20:19:27 musolffc Exp $ +# $Id: lonpubdir.pm,v 1.168 2016/06/10 22:31:34 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -375,7 +375,8 @@ sub startpage { $r->print(&Apache::loncommon::head_subbox( '
' - .&Apache::lonhtmlcommon::display_usage($current_disk_usage,$disk_quota) + .&Apache::lonhtmlcommon::display_usage($current_disk_usage, + $disk_quota,'authoring') .'
' .&Apache::loncommon::CSTR_pageheader())); @@ -915,6 +916,12 @@ sub putresource { $editlink=' ('.&mt('EditXML').')'; $editlink2='
('.&mt('Edit').')'; } + if ($filename=~/\.(xml|html|htm|xhtml|xhtm)$/ || $filename=~/$LONCAPA::assess_re/) { + if ($env{'browser.type'} ne 'explorer' || $env{'browser.version'} > 9) { + my $daxeurl = '/daxepage'.$linkdir.'/'.$filename; + $editlink .= ' (Daxe)'; + } + } if ($filename=~/\.(problem|exam|quiz|assess|survey|form|library|xml|html|htm|xhtml|xhtm|sty)$/) { $editlink.=' ('.&mt('Clean Up').')'; }