--- loncom/lti/ltiauth.pm	2021/08/04 19:59:11	1.20
+++ loncom/lti/ltiauth.pm	2021/08/12 00:05:27	1.23
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Basic LTI Authentication Module
 #
-# $Id: ltiauth.pm,v 1.20 2021/08/04 19:59:11 raeburn Exp $
+# $Id: ltiauth.pm,v 1.23 2021/08/12 00:05:27 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -68,7 +68,7 @@ sub handler {
         }
     }
 #
-# Check for existing session, and restored temporarily
+# Check for existing session, and restore temporarily
 # deleted form items to %env, if session exists.
 #
     if ($handle ne '') {
@@ -854,7 +854,7 @@ sub lti_session {
             my $lowest_load;
             ($otherserver,undef,undef,undef,$lowest_load) = &Apache::lonnet::choose_server($udom);
             if ($lowest_load > 100) {
-                $otherserver = &Apache::lonnet::spareserver($lowest_load,$lowest_load,1,$udom);
+                $otherserver = &Apache::lonnet::spareserver($r,$lowest_load,$lowest_load,1,$udom);
             }
         }
         if ($otherserver ne '') {
@@ -1036,7 +1036,7 @@ sub course_from_tinyurl {
     my ($tail) = @_;
     my ($urlcdom,$urlcnum);
     if ($tail =~ m{^/tiny/($match_domain)/(\w+)$}) {
-        my ($urlcdom,$key) = ($1,$2);
+        ($urlcdom,my $key) = ($1,$2);
         my $tinyurl;
         my ($result,$cached)=&Apache::lonnet::is_cached_new('tiny',$urlcdom."\0".$key);
         if (defined($cached)) {