--- loncom/interface/lonprintout.pm 2003/09/25 18:19:34 1.239 +++ loncom/interface/lonprintout.pm 2003/09/25 20:43:31 1.240 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.239 2003/09/25 18:19:34 bowersj2 Exp $ +# $Id: lonprintout.pm,v 1.240 2003/09/25 20:43:31 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -655,9 +655,7 @@ ENDPART $currentURL=$helper->{'VARS'}->{'postdata'}; } else { #prints resource from the construction space - $currentURL=$helper->{'VARS'}->{'filename'}; - $currentURL=~s/\/home\//\/~/; - $currentURL=~s/public_html\///; + $currentURL='/'.$helper->{'VARS'}->{'filename'}; if ($currentURL=~/([^?]+)/) {$currentURL=$1;} } $selectionmade = 1; @@ -1162,7 +1160,7 @@ sub printHelper { my $printChoices = []; my $paramHash; - if ($resourceTitle && $helper->{VARS}->{'postdata'}) { + if ($resourceTitle) { push @{$printChoices}, ["$resourceTitle (what you just saw on the screen)", 'current_document', 'PAGESIZE']; }