--- loncom/interface/loncreateuser.pm	2009/11/12 15:58:22	1.324
+++ loncom/interface/loncreateuser.pm	2009/11/18 20:01:36	1.326
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.324 2009/11/12 15:58:22 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.326 2009/11/18 20:01:36 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -552,10 +552,10 @@ sub print_username_entry_form {
                           &mt('View/Modify existing role:').'</b></label></td>'.
                           '<td align="center"><br />'.
                           '<select name="rolename" onchange="setCustomAction('."'edit'".');">'.
-                          '<option value="" selected="selected" onchange="">'.
+                          '<option value="" selected="selected">'.
                           &mt('Select'));
                 foreach my $role (sort(keys(%existingroles))) {
-                    $r->print('<option value="$role">'.$role.'</option>');
+                    $r->print('<option value="'.$role.'">'.$role.'</option>');
                 }
                 $r->print('</select>'.
                           '</td>'.
@@ -3572,7 +3572,6 @@ sub custom_role_editor {
     my $dompriv='';
     my $coursepriv='';
     my $body_top;
-    my ($disp_dummy,$disp_roles) = &Apache::lonnet::get('roles',["st"]);
     my ($rdummy,$roledef)=
 			 &Apache::lonnet::get('roles',["rolesdef_$rolename"]);
 # ------------------------------------------------------- Does this role exist?