Index: lib.php
===================================================================
RCS file: /cvsroot/moodle/moodle/course/lib.php,v
retrieving revision 1.538.2.51
diff -u -r1.538.2.51 lib.php
--- lib.php	26 Jul 2008 11:35:23 -0000	1.538.2.51
+++ lib.php	3 Sep 2008 16:13:21 -0000
@@ -3087,6 +3087,29 @@
     if ($newcourseid = insert_record('course', $data)) {  // Set up new course
 
         $course = get_record('course', 'id', $newcourseid);
+		
+		// Rename roles, if necessary
+        foreach ($data as $dname => $dvalue) {
+          
+            // is this the right param?
+            $dvalue = clean_param($dvalue, PARAM_NOTAGS);
+
+            if (!strstr($dname, 'role_')) {
+                continue;
+            }  
+            
+            $dt = explode('_', $dname);
+            $roleid = $dt[1];
+            
+            if (!empty($dvalue)) {
+                
+                $context   = get_context_instance(CONTEXT_COURSE, $course->id);                
+                $t->contextid = $context->id;
+                $t->roleid = $roleid;
+                $t->name = $dvalue;
+                insert_record('role_names', $t);  
+            }
+        }	
 
         // Setup the blocks
         $page = page_create_object(PAGE_COURSE_VIEW, $course->id);