--- loncom/interface/londocs.pm 2011/12/04 15:51:58 1.467 +++ loncom/interface/londocs.pm 2011/12/21 23:23:08 1.469 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.467 2011/12/04 15:51:58 raeburn Exp $ +# $Id: londocs.pm,v 1.469 2011/12/21 23:23:08 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2200,13 +2200,23 @@ END } else { $reinit = &mt('(re-initialize course to access)'); } - $line.=' - - '.($url?'':'').''.($url?'':'').' - - - '.($url?"":'').$title.($url?'':' '.$reinit.'').$external." - "; + $line.=''; + if ($url=~m{/adm/coursedocs}) { + $line.=''; + } elsif ($url) { + $line.=&Apache::loncommon::modal_link($url.'&inhibitmenu=yes','',600,500); + } else { + $line.=''; + } + $line.=''; + if ($url=~m{/adm/coursedocs}) { + $line.=''.$title.''; + } elsif ($url) { + $line.=&Apache::loncommon::modal_link($url.'&inhibitmenu=yes',$title,600,500); + } else { + $line.=$title.' '.$reinit.''; + } + $line.=$external.""; if (($allowed) && ($folder!~/^supplemental/)) { my %lt=&Apache::lonlocal::texthash( 'hd' => 'Hidden', @@ -2876,9 +2886,16 @@ sub handler { # Do we directly jump somewhere? if ($env{'form.command'} eq 'direct') { - my ($mapurl,$id,$resurl) = &Apache::lonnet::decode_symb($env{'form.symb'}); - if ($resurl=~/\.(sequence|page)$/) { - $mapurl=$resurl; + my ($mapurl,$id,$resurl); + if ($env{'form.symb'} eq '') { + $mapurl = $env{'course.'.$env{'request.course.id'}.'.url'}; + } else { + ($mapurl,$id,$resurl) = &Apache::lonnet::decode_symb($env{'form.symb'}); + if ($resurl=~/\.(sequence|page)$/) { + $mapurl=$resurl; + } elsif ($resurl eq 'adm/navmaps') { + $mapurl=$env{'course.'.$env{'request.course.id'}.'.url'}; + } } my $mapresobj; my $navmap = Apache::lonnavmaps::navmap->new();