--- loncom/homework/outputtags.pm 2016/08/09 23:43:42 1.58 +++ loncom/homework/outputtags.pm 2017/05/23 14:59:07 1.60 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # tags that create controlled output # -# $Id: outputtags.pm,v 1.58 2016/08/09 23:43:42 raeburn Exp $ +# $Id: outputtags.pm,v 1.60 2017/05/23 14:59:07 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -33,6 +33,7 @@ package Apache::outputtags; use strict; use Apache::lonlocal; use Apache::lonnet; +use LONCAPA::LWPReq; use POSIX qw(strftime); BEGIN { @@ -316,9 +317,9 @@ sub start_displaystudentphoto { } if ($target eq 'tex' && $env{'request.role'} =~ /^cc/) { my $url=&Apache::lonnet::studentphoto($domain,$user,"eps"); - my $ua=new LWP::UserAgent; + my $uhome=&Apache::lonnet::homeserver($user,$domain); my $request=new HTTP::Request('GET',$url); - my $response=$ua->request($request); + my $response=&LONCAPA::LWPReq::makerequest($uhome,$request,'','','',1); if ($response->is_success) { my $file=$user."_".$domain."_studentphoto.eps"; open(FILE,">".$Apache::lonnet::perlvar{'lonPrtDir'}."/$file");