--- loncom/html/adm/helper/course.initialization.helper 2007/09/05 00:59:51 1.19
+++ loncom/html/adm/helper/course.initialization.helper 2007/09/05 12:46:21 1.20
@@ -256,7 +256,7 @@
my ($clname,$cldom) = split(/:/,$item);
if ($clname eq '*') {
if ($cldom =~ /^$match_dom$/) {
- if (!&Apache::lonnet::domain($udom)) {
+ if (!&Apache::lonnet::domain($cldom)) {
$disallowed{'domain'} .= $item.',';
}
} else {
@@ -265,7 +265,7 @@
} elsif ($item !~/^($match_uname)\:($match_dom)$/) {
$disallowed{'format'} .= $item.',';
} else {
- if (!grep(/^\Q$cldom\E$/,@alldoms)) {
+ if (!&Apache::lonnet::domain($cldom)) {
$disallowed{'domain'} .= $item.',';
} elsif (&Apache::lonnet::homeserver($clname,$cldom) eq 'no_host') {
$disallowed{'newuser'} .= $item.',';