[LON-CAPA-cvs] cvs: loncom /interface printout.pl

[raeburn]

raeburn		Tue Feb 18 23:57:54 2020 EDT

  Modified files:              
    /loncom/interface	printout.pl 
  Log:
  - "Change Printing Options" link when printing a "Composite Page" in a course
    references URL of page (without symb).
  
  
Index: loncom/interface/printout.pl
diff -u loncom/interface/printout.pl:1.166 loncom/interface/printout.pl:1.167
--- loncom/interface/printout.pl:1.166	Sun Nov 12 16:23:03 2017
+++ loncom/interface/printout.pl	Tue Feb 18 23:57:54 2020
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 # CGI-script to run LaTeX, dvips, ps2ps, ps2pdf etc.
 #
-# $Id: printout.pl,v 1.166 2017/11/12 16:23:03 raeburn Exp $
+# $Id: printout.pl,v 1.167 2020/02/18 23:57:54 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -211,6 +211,9 @@
     @names_pack=split(/_ENDPERSON_/,$student_names);
 }
 if ($backref) {
+    if ($backref =~ m{^(/uploaded/$LONCAPA::match_domain/$LONCAPA::match_courseid/default_\d+.page)}) {
+        $backref = $1;
+    }
     print('<p>'.&mt("[_1]Return[_2] to resource.",
 		    "<a href=\"$backref\"><b>","</b></a>").'</p>');
     print('<p><a href="javascript:gopost(\'/adm/printout\',\''.$backref.'\');">'.