--- loncom/interface/loncreateuser.pm 2007/06/11 22:24:51 1.155
+++ loncom/interface/loncreateuser.pm 2007/07/20 23:55:12 1.158
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.155 2007/06/11 22:24:51 banghart Exp $
+# $Id: loncreateuser.pm,v 1.158 2007/07/20 23:55:12 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -65,7 +65,6 @@ use Apache::lonnet;
use Apache::loncommon;
use Apache::lonlocal;
use Apache::longroup;
-use lib '/home/httpd/lib/perl/';
use LONCAPA qw(:DEFAULT :match);
my $loginscript; # piece of javascript used in two separate instances
@@ -222,10 +221,10 @@ sub print_username_entry_form {
$r->print(<<"ENDDOCUMENT");
$start_page
'.
+ ''.
&Apache::loncommon::end_page());
}
# --------------------------------------------------------
@@ -1933,7 +1931,7 @@ sub course_level_table {
if (&Apache::lonnet::allowed('c'.$role,$thiscourse)) {
my $plrole=&Apache::lonnet::plaintext($role);
$table .= &Apache::loncommon::start_data_table_row().
-'
+'
'.$plrole.'
'.$area.' Domain: '.$domain.'
'."\n";
if ($role ne 'cc') {
@@ -1946,22 +1944,22 @@ sub course_level_table {
$currsec.''.
'