[LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm

raeburn lon-capa-cvs-allow@mail.lon-capa.org
Thu, 15 Nov 2007 19:06:29 -0000


raeburn		Thu Nov 15 14:06:29 2007 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  Fix bug 5521.  Typo introduced in rev 1.170.
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.194 loncom/interface/loncreateuser.pm:1.195
--- loncom/interface/loncreateuser.pm:1.194	Mon Nov 12 10:37:47 2007
+++ loncom/interface/loncreateuser.pm	Thu Nov 15 14:06:28 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.194 2007/11/12 15:37:47 albertel Exp $
+# $Id: loncreateuser.pm,v 1.195 2007/11/15 19:06:28 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1825,7 +1825,7 @@
 		    $r->print($result);
 		}
 	    } 
-	    if ($key=~m{^form\.rev\:([^_]+)_cr\.cr/($match_domain)/($match_username)/(\w+)$ }s) {
+	    if ($key=~m{^form\.rev\:([^_]+)_cr\.cr/($match_domain)/($match_username)/(\w+)$}s) {
 # Revoke custom role
 		$r->print(&mt('Revoking custom role:').
                       ' '.$4.' by '.$3.':'.$2.' in '.$1.': <b>'.