--- loncom/interface/londocs.pm 2018/12/29 23:24:39 1.658 +++ loncom/interface/londocs.pm 2018/12/30 19:47:02 1.659 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.658 2018/12/29 23:24:39 raeburn Exp $ +# $Id: londocs.pm,v 1.659 2018/12/30 19:47:02 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4183,9 +4183,8 @@ END if ($url =~ /^([^#]+)#([^#]+)$/) { $url = $1; $anchor = $2; - if ($symb =~ m{^([^#]+)\Q#$anchor\E$}) { - $shownsymb = $1.&escape('#').$anchor; - } + my $escan = &escape('#'); + $shownsymb =~ s/^([^\#]+)#([^\#]+)$/$1$escan$2/; } } unless ($env{'request.role.adv'}) { @@ -4437,8 +4436,7 @@ $form_end; } else { $link = $url; } - $link = &js_escape($link.(($url=~/\?/)?'&':'?').'inhibitmenu=yes'. - (($anchor ne '')?$anchor:'')); + $link = &js_escape($link.(($url=~/\?/)?'&':'?').'inhibitmenu=yes'.$anchor); if ($nomodal) { $line.=''. '';