--- loncom/interface/lontiny.pm	2022/07/02 19:55:15	1.15
+++ loncom/interface/lontiny.pm	2022/07/08 03:05:18	1.16
@@ -2,7 +2,7 @@
 # Extract domain, courseID, and symb from a shortened URL,
 # and switch role to a role in designated course.
 #
-# $Id: lontiny.pm,v 1.15 2022/07/02 19:55:15 raeburn Exp $
+# $Id: lontiny.pm,v 1.16 2022/07/08 03:05:18 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -250,7 +250,7 @@ sub handler {
                                         $destination .= '&ttoken='.$env{'form.ttoken'};
                                     }
                                     &do_redirect($r,$destination,$linkprot);
-                                } elsif (keys(%possroles) > 1) {
+                                } elsif (@allposs > 1) {
                                     if (grep(/^(cc|co)$/,@allposs)) {
                                         my $newrole;
                                         if (exists($possroles{'cc'})) {
@@ -270,7 +270,7 @@ sub handler {
                                         if (grep(/^cr\//,@allposs)) {
                                             $hascustom = 1;
                                         }
-                                        &show_roles($r,\%crsenv,\%possroles,$hassection,$hascustom);
+                                        &show_roles($r,\%crsenv,\%active,$hassection,$hascustom);
                                     }
                                 }
                                 return OK;