--- loncom/auth/lonroles.pm	2004/01/31 00:46:45	1.85
+++ loncom/auth/lonroles.pm	2004/03/09 21:01:55	1.88
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.85 2004/01/31 00:46:45 www Exp $
+# $Id: lonroles.pm,v 1.88 2004/03/09 21:01:55 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -142,6 +142,10 @@ ENDENTERKEY
 			     }
 			 }
 		     }
+		    &Apache::lonnet::log($ENV{'user.domain'},
+					 $ENV{'user.name'},
+					 $ENV{'user.home'},
+					 "Role ".$trolecode);
                     my $tadv=0;
                     if (($trolecode!~/^st/) && 
                         ($trolecode!~/^ta/) && 
@@ -370,6 +374,7 @@ ENDHEADER
                     $tbg='#11CC55';
                     $tfont='#002200';
 		    $inrole=1;
+		    $countactive++;
                     $tremark.=&mt('Currently selected. ');
                 }
                 my $trole;
@@ -524,7 +529,7 @@ ENDHEADER
 	$r->print('</form></body></html>');
 	return OK;
 # Is there only one choice?
-    } elsif ($countactive==1) {
+    } elsif (($countactive==1) && ($ENV{'request.role'} eq 'cm')) {
 	$r->print('<h3>'.&mt('Please stand by.').'</h3>'.
 	    '<input type="hidden" name="'.$possiblerole.'" value="1" />');
 	$r->print("</form>\n");