--- loncom/interface/loncreateuser.pm	2003/09/17 17:30:10	1.67
+++ loncom/interface/loncreateuser.pm	2003/10/13 21:41:19	1.69
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.67 2003/09/17 17:30:10 albertel Exp $
+# $Id: loncreateuser.pm,v 1.69 2003/10/13 21:41:19 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -63,6 +63,7 @@ use strict;
 use Apache::Constants qw(:common :http);
 use Apache::lonnet;
 use Apache::loncommon;
+use Apache::lonlocal;
 
 my $loginscript; # piece of javascript used in two separate instances
 my $generalrule;
@@ -547,7 +548,7 @@ ENDCOAUTH
     '<th>Start</th><th>End</th></tr>');
     foreach ( sort( keys(%incdomains))) {
 	my $thisdomain=$_;
-        foreach ('dc','li','dg','au') {
+        foreach ('dc','li','dg','au','sc') {
             if (&Apache::lonnet::allowed('c'.$_,$thisdomain)) {
                my $plrole=&Apache::lonnet::plaintext($_);
                $r->print(<<ENDDROW);
@@ -1082,7 +1083,7 @@ sub handler {
     my $r = shift;
 
     if ($r->header_only) {
-       $r->content_type('text/html');
+       &Apache::loncommon::content_type($r,'text/html');
        $r->send_http_header;
        return OK;
     }
@@ -1093,7 +1094,7 @@ sub handler {
         (&Apache::lonnet::allowed('cep',$ENV{'request.course.id'})) ||
         (&Apache::lonnet::allowed('cca',$ENV{'request.role.domain'})) ||
         (&Apache::lonnet::allowed('mau',$ENV{'request.role.domain'}))) {
-       $r->content_type('text/html');
+       &Apache::loncommon::content_type($r,'text/html');
        $r->send_http_header;
        unless ($ENV{'form.phase'}) {
 	   &print_username_entry_form($r);