version 1.8.2.10, 2010/03/23 04:57:36
|
version 1.8.2.11, 2010/05/22 01:31:31
|
Line 1767 sub print_courseinfo {
|
Line 1767 sub print_courseinfo {
|
if (@entries > 0) { |
if (@entries > 0) { |
foreach my $entry (@entries) { |
foreach my $entry (@entries) { |
my ($uname,$udom) = split(/:/,$entry); |
my ($uname,$udom) = split(/:/,$entry); |
my ($uname,$udom) = split(/:/,$entry); |
|
if ($udom =~ /^$match_domain$/) { |
if ($udom =~ /^$match_domain$/) { |
unless (&Apache::lonnet::domain($udom)) { |
unless (&Apache::lonnet::domain($udom)) { |
next; |
next; |