diff --git a/lib/WeBWorK/Authen/LTIAdvantage.pm b/lib/WeBWorK/Authen/LTIAdvantage.pm index 49ad069138..825417c1b3 100644 --- a/lib/WeBWorK/Authen/LTIAdvantage.pm +++ b/lib/WeBWorK/Authen/LTIAdvantage.pm @@ -205,9 +205,9 @@ sub get_credentials ($self) { } # Get the target_link_uri from the claims. - $c->stash->{LTILauncRedirect} = $claims->{'https://purl.imsglobal.org/spec/lti/claim/target_link_uri'}; + $c->stash->{LTILaunchRedirect} = $claims->{'https://purl.imsglobal.org/spec/lti/claim/target_link_uri'}; - unless (defined $c->stash->{LTILauncRedirect}) { + unless (defined $c->stash->{LTILaunchRedirect}) { $self->{error} = $c->maketext( 'There was an error during the login process. Please speak to your instructor or system administrator.'); warn 'LTI is not properly configured (failed to obtain target_link_uri). ' @@ -218,7 +218,7 @@ sub get_credentials ($self) { # Get the courseID from the target_link_uri and verify that it is the same as the one that was in the state. my $location = $c->location; - my $target = $c->url_for($c->stash->{LTILauncRedirect})->path; + my $target = $c->url_for($c->stash->{LTILaunchRedirect})->path; my $courseID; $courseID = $1 if $target =~ m|$location/([^/]*)|; diff --git a/lib/WeBWorK/ContentGenerator/LTIAdvantage.pm b/lib/WeBWorK/ContentGenerator/LTIAdvantage.pm index 18772250cb..61467eb808 100644 --- a/lib/WeBWorK/ContentGenerator/LTIAdvantage.pm +++ b/lib/WeBWorK/ContentGenerator/LTIAdvantage.pm @@ -24,7 +24,7 @@ sub login ($c) { } sub launch ($c) { - return $c->redirect_to($c->systemLink($c->url_for($c->stash->{LTILauncRedirect}))); + return $c->redirect_to($c->systemLink($c->url_for($c->stash->{LTILaunchRedirect}))); } sub keys ($c) {