--- loncom/lonnet/perl/lonnet.pm 2012/05/28 15:02:06 1.1172.2.2 +++ loncom/lonnet/perl/lonnet.pm 2012/05/29 12:16:42 1.1172.2.3 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1172.2.2 2012/05/28 15:02:06 raeburn Exp $ +# $Id: lonnet.pm,v 1.1172.2.3 2012/05/29 12:16:42 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -75,8 +75,6 @@ use LWP::UserAgent(); use HTTP::Date; use Image::Magick; -use Encode; - use vars qw(%perlvar %spareid %pr %prp $memcache %packagetab $tmpdir $_64bit %env %protocol %loncaparevs %serverhomeIDs %needsrelease %managerstab); @@ -2570,11 +2568,10 @@ sub ssi { $request->header(Cookie => $ENV{'HTTP_COOKIE'}); my $response= $ua->request($request); - my $content = Encode::decode_utf8($response->content); if (wantarray) { - return ($content, $response); + return ($response->content, $response); } else { - return $content; + return $response->content; } }