[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface londocs.pm

[raeburn]

raeburn		Thu Mar 12 07:40:52 2020 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	londocs.pm 
  Log:
  - For 2.11
    Backport 1.670
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.484.2.87 loncom/interface/londocs.pm:1.484.2.88
--- loncom/interface/londocs.pm:1.484.2.87	Thu Mar  5 22:35:58 2020
+++ loncom/interface/londocs.pm	Thu Mar 12 07:40:51 2020
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.484.2.87 2020/03/05 22:35:58 raeburn Exp $
+# $Id: londocs.pm,v 1.484.2.88 2020/03/12 07:40:51 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3930,12 +3930,7 @@
             if (&Apache::lonnet::symbverify($symb,$url)) {
                 my $shownsymb = $symb;
                 if ($isexternal) {
-                    if ($url =~ /^([^#]+)#([^#]+)$/) {
-                        $url = $1;
-                        $anchor = $2;
-                        my $escan = &escape('#');
-                        $shownsymb =~ s/^([^\#]+)#([^\#]+)$/$1$escan$2/;
-                    }
+                    $url =~ s/\#[^#]+$//;
                     if ($container eq 'page') {
                         $url = &Apache::lonnet::clutter($url);
                     }