--- loncom/interface/loncreateuser.pm	2009/08/05 13:40:10	1.303
+++ loncom/interface/loncreateuser.pm	2009/08/06 05:48:56	1.304
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.303 2009/08/05 13:40:10 bisitz Exp $
+# $Id: loncreateuser.pm,v 1.304 2009/08/06 05:48:56 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -248,13 +248,15 @@ sub build_tools_display {
             &Apache::lonnet::usertools_access($ccuname,$ccdomain,$item,undef,
                                               $context);
         if ($userenv{$context.'.'.$item} eq '') {
-            $custom_access = 'default';
+            $custom_access = 
+                &mt('Availability determined currently from default setting.');
             if (!$curr_access) {
                 $tool_off = 'checked="checked" ';
                 $tool_on = '';
             }
         } else {
-            $custom_access = 'custom';
+            $custom_access = 
+                &mt('Availability determined currently from custom setting.');
             $cust_on = ' checked="checked" ';
             $cust_off = '';
             if ($userenv{$context.'.'.$item} == 0) {
@@ -266,8 +268,7 @@ sub build_tools_display {
                    '   <td>'.$lt{$item}.'</td>'."\n".
                    '  </tr>'."\n".
                    &Apache::loncommon::start_data_table_row()."\n".
-                   '  <td>'.&mt('Availability determined currently from [_1] setting.',$custom_access).
-                   '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'.$lt{'avai'}.': '.
+                   '  <td>'.$custom_access.('&nbsp;'x5).$lt{'avai'}.': '.
                    ($curr_access?&mt('Yes'):&mt('No')).'</td>'."\n".
                    &Apache::loncommon::end_data_table_row()."\n".
                    &Apache::loncommon::start_data_table_row()."\n".
@@ -835,6 +836,7 @@ ENDTITLE
             &personal_data_display($ccuname,$ccdomain,$newuser,$context,
                                    $inst_results{$ccuname.':'.$ccdomain});
         $r->print($personal_table);
+#FIXME
         my ($home_server_pick,$numlib) = 
             &Apache::loncommon::home_server_form_item($ccdomain,'hserver',
                                                       'default','hide');
@@ -846,6 +848,13 @@ $lt{'hs'}: $home_server_pick
         } else {
             $r->print($home_server_pick);
         }
+        if (&Apache::lonnet::allowed('ccc',$env{'request.role.domain'})) {
+            $r->print('<br /><h3>'.&mt('User Can Request Creation of Courses in this Domain?').'</h3>'.
+                      &Apache::loncommon::start_data_table().
+                      &build_tools_display($ccuname,$ccdomain,
+                                           'requestcourses').
+                      &Apache::loncommon::end_data_table());
+        }
         $r->print('</div>'."\n".'<div class="LC_left_float"><h3>'.
                   $lt{'lg'}.'</h3>');
         my ($fixedauth,$varauth,$authmsg);