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

[raeburn]

raeburn		Sat Nov 26 01:28:15 2016 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  - Reinstate return to resource via Exit Editor for original access by "Edit Folder"
    link/icon in Functions menu for the case where original resource does not have
    an anchor (see rev. 1.609 changes).
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.613 loncom/interface/londocs.pm:1.614
--- loncom/interface/londocs.pm:1.613	Wed Nov 23 16:42:25 2016
+++ loncom/interface/londocs.pm	Sat Nov 26 01:28:14 2016
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.613 2016/11/23 16:42:25 raeburn Exp $
+# $Id: londocs.pm,v 1.614 2016/11/26 01:28:14 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6679,6 +6679,8 @@
                     if (($caller =~ m{^([^#]+)\Q#$anchor\E$})) {
                         $caller = $1.&escape('#').$anchor;
                     }
+                } else {
+                    $url = $res;
                 }
                 $backtourl = &HTML::Entities::encode(&Apache::lonnet::clutter($url),'<>&"').'?symb='.
                              &HTML::Entities::encode($caller,'<>&"');