loncom/lti/ltiutils.pm - diff

Return to ltiutils.pm CVS log

Up to [LON-CAPA] / loncom / lti

version 1.17.2.1, 2022/01/03 18:35:27	version 1.17.2.2, 2022/01/20 00:35:00
Line 31 package LONCAPA::ltiutils;	Line 31 package LONCAPA::ltiutils;
use strict;	use strict;
use Net::OAuth;	use Net::OAuth;
use Digest::SHA;	use Digest::SHA;
	use Digest::MD5 qw(md5_hex);
	use LWP::UserAgent();
use Apache::lonnet;	use Apache::lonnet;
use Apache::loncommon;	use Apache::loncommon;
use LONCAPA qw(:DEFAULT :match);	use LONCAPA qw(:DEFAULT :match);
Line 287 sub setup_logout_callback {	Line 289 sub setup_logout_callback {
);	);
my $post = &sign_params($service_url,$ckey,$secret,\%ltiparams,	my $post = &sign_params($service_url,$ckey,$secret,\%ltiparams,
'','','',1);	'','','',1);

	my $ua=new LWP::UserAgent;
	$ua->timeout(10);
my $request=new HTTP::Request('POST',$service_url);	my $request=new HTTP::Request('POST',$service_url);
$request->content($post);	$request->content($post);
my $response = &LONCAPA::LWPReq::makerequest('',$request,'','',10);	my $response=$ua->request($request);
}	}
}	}
return;	return;