--- loncom/interface/lonmenu.pm 2015/04/16 10:13:25 1.432 +++ loncom/interface/lonmenu.pm 2015/05/28 02:53:29 1.433 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.432 2015/04/16 10:13:25 droeschl Exp $ +# $Id: lonmenu.pm,v 1.433 2015/05/28 02:53:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -771,6 +771,9 @@ sub innerregister { my $currdir = '/priv/'.$udom.'/'.$uname.'/'.$thisdisfn; if ($currdir =~ m-/$-) { $is_const_dir = 1; + if ($thisdisfn eq '') { + $is_const_dir = 2; + } } else { $currdir =~ s|[^/]+$||; my $cleandisfn = &Apache::loncommon::escape_single($thisdisfn); @@ -922,9 +925,16 @@ ENDMENUITEMS &advtools_crumbs(@inlineremote); } } - + my ($topic_help,$topic_help_text); + if ($is_const_dir == 2) { + if (&Apache::lonnet::usertools_access($env{'user.name'},$env{'user.domain'},'webdav')) { + $topic_help = 'Authoring_WebDAV,Authoring_WebDAV_Mac_10v6,Authoring_WebDAV_Mac_10v10,'. + 'Authoring_WebDAV_Windows_v7,Authoring_WebDAV_Linux_Centos'; + $topic_help_text = 'About WebDAV access'; + } + } return &Apache::lonhtmlcommon::scripttag('', 'start') - . &Apache::lonhtmlcommon::breadcrumbs(undef,undef,0) + . &Apache::lonhtmlcommon::breadcrumbs(undef,undef,0,'','','','',$topic_help,$topic_help_text) . &Apache::lonhtmlcommon::scripttag('', 'end'); }