--- loncom/interface/lonprintout.pm 2016/08/10 16:06:03 1.650 +++ loncom/interface/lonprintout.pm 2016/12/06 03:28:29 1.651 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.650 2016/08/10 16:06:03 raeburn Exp $ +# $Id: lonprintout.pm,v 1.651 2016/12/06 03:28:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2743,7 +2743,7 @@ ENDPART $cleanURL=$currentURL; } $selectionmade = 1; - + if ($cleanURL!~m|^/adm/| && $cleanURL=~/\.(problem|exam|quiz|assess|survey|form|library|xml|html|htm|xhtml|xhtm)$/) { my $rndseed=time; @@ -2956,12 +2956,13 @@ ENDPART my $texversion=''; if ($urlp!~m|^/adm/| && $urlp=~/\.(problem|exam|quiz|assess|survey|form|library|page|xml|html|htm|xhtml|xhtm)$/) { + my $extension = $1; $resources_printed .= $urlp.':'; &Apache::lonxml::remember_problem_counter(); if ($flag_latex_header_remove eq 'NO') { $texversion.=&print_latex_header($helper->{'VARS'}->{'LATEX_TYPE'}); # RF unless (($helper->{'VARS'}->{'ANSWER_TYPE'} eq 'only') || - (($i==0) && + (($i==0) && ($extension !~ /^x?html?$/) && (($urlp=~/\.page$/) || ($print_type eq 'map_problems_in_page') || ($print_type eq 'map_resources_in_page')))) {