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

raeburn raeburn at source.lon-capa.org
Fri Aug 16 14:27:51 EDT 2019


raeburn		Fri Aug 16 18:27:51 2019 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	londocs.pm 
  Log:
  - For 2.11
    Backport 1.640
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.484.2.82 loncom/interface/londocs.pm:1.484.2.83
--- loncom/interface/londocs.pm:1.484.2.82	Fri Aug 16 16:12:37 2019
+++ loncom/interface/londocs.pm	Fri Aug 16 18:27:50 2019
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.484.2.82 2019/08/16 16:12:37 raeburn Exp $
+# $Id: londocs.pm,v 1.484.2.83 2019/08/16 18:27:50 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6547,8 +6547,13 @@
                 } else {
                     $url = $res;
                 }
-                $backtourl = &HTML::Entities::encode(&Apache::lonnet::clutter($url),'<>&"').'?symb='.
-                             &HTML::Entities::encode($caller,'<>&"');
+                $backtourl = &HTML::Entities::encode(&Apache::lonnet::clutter($url),'<>&"');
+                if ($backtourl =~ m{^\Q/uploaded/$coursedom/$coursenum/\Edefault_\d+\.sequence$}) {
+                    $backtourl .= '?navmap=1';
+                } else {
+                    $backtourl .= '?symb='.
+                                  &HTML::Entities::encode($caller,'<>&"');
+                }
                 if ($backtourl =~ m{^\Q/public/$coursedom/$coursenum/syllabus\E}) {
                     if (($ENV{'SERVER_PORT'} == 443) &&
                         ($env{'course.'.$env{'request.course.id'}.'.externalsyllabus'} =~ m{^http://})) {




More information about the LON-CAPA-cvs mailing list