--- loncom/interface/lonprintout.pm 2016/12/06 03:43:46 1.652 +++ loncom/interface/lonprintout.pm 2017/01/30 19:35:16 1.656 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.652 2016/12/06 03:43:46 raeburn Exp $ +# $Id: lonprintout.pm,v 1.656 2017/01/30 19:35:16 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3448,7 +3448,11 @@ ENDPART $URLback=$helper->{'VARS'}->{'filename'}; } elsif ($helper->{VARS}{'symb'}) { my ($map, $id, $url) = &Apache::lonnet::decode_symb($helper->{VARS}{'symb'}); - $URLback = &Apache::lonnet::clutter($url); + $url = &Apache::lonnet::clutter($url); + if ($env{'request.enc'}) { + $url = &Apache::lonenc::encrypted($url); + } + $URLback = $url.($url =~ /\?/) ? '&':'?'.'?symb='.$helper->{VARS}{'symb'}; } # # Final adjustment of the font size: @@ -3532,7 +3536,7 @@ ENDPART 'cgi.'.$identifier.'.role' => $perm{'pav'}, 'cgi.'.$identifier.'.numberoffiles' => $#print_array, 'cgi.'.$identifier.'.studentnames' => $student_names, - 'cgi.'.$identifier.'.backref' => $URLback,}); + 'cgi.'.$identifier.'.backref' => &escape($URLback),}); &Apache::lonnet::appenv({"cgi.$identifier.user" => $env{'user.name'}, "cgi.$identifier.domain" => $env{'user.domain'}, "cgi.$identifier.courseid" => $cnum,