[LON-CAPA-cvs] cvs: loncom /interface lonexttool.pm
raeburn
raeburn at source.lon-capa.org
Tue Aug 14 14:20:17 EDT 2018
raeburn Tue Aug 14 18:20:17 2018 EDT
Modified files:
/loncom/interface lonexttool.pm
Log:
- Remove trailing whitespace.
- End lines with semi-colons.
Index: loncom/interface/lonexttool.pm
diff -u loncom/interface/lonexttool.pm:1.19 loncom/interface/lonexttool.pm:1.20
--- loncom/interface/lonexttool.pm:1.19 Wed May 23 16:36:14 2018
+++ loncom/interface/lonexttool.pm Tue Aug 14 18:20:17 2018
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Launch External Tool Provider (LTI)
#
-# $Id: lonexttool.pm,v 1.19 2018/05/23 16:36:14 raeburn Exp $
+# $Id: lonexttool.pm,v 1.20 2018/08/14 18:20:17 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -259,10 +259,10 @@
$msgtype = 'basic-lti-launch-request';
}
if ($crslabel eq '') {
- $crslabel = $env{'course.'.$env{'request.course.id'}.'.internal.coursecode'},
+ $crslabel = $env{'course.'.$env{'request.course.id'}.'.internal.coursecode'};
}
if ($crstitle eq '') {
- $crstitle = $env{'course.'.$env{'request.course.id'}.'.description'},;
+ $crstitle = $env{'course.'.$env{'request.course.id'}.'.description'};
}
my $lonhost = $r->dir_config('lonHostID');
my $loncaparev = $r->dir_config('lonVersion');
@@ -322,7 +322,7 @@
tool_consumer_instance_guid => $lonhost,
tool_consumer_instance_description => $domdesc,
tool_consumer_info_product_family_code => 'loncapa',
- tool_consumer_instance_name => $int_dom,
+ tool_consumer_instance_name => $int_dom,
tool_consumer_instance_url => $portal_url,
tool_consumer_info_version => $loncaparev,
user_id => $digest_user,
@@ -351,7 +351,7 @@
$ltiparams{'ext_ims_lis_basic_outcome_url'} = $ltiparams{'lis_outcome_service_url'};
if ($gradesecret) {
my $uniqid = $digest_symb.':::'.$digest_user.':::'.$env{'request.course.id'};
- $ltiparams{'lis_result_sourcedid'} = &LONCAPA::ltiutils::get_service_id($gradesecret,$uniqid);
+ $ltiparams{'lis_result_sourcedid'} = &LONCAPA::ltiutils::get_service_id($gradesecret,$uniqid);
}
}
if ($roster) {
More information about the LON-CAPA-cvs
mailing list