version 1.23, 2002/05/30 13:09:13
|
version 1.24, 2002/05/30 13:36:18
|
Line 1425 sub ClassList {
|
Line 1425 sub ClassList {
|
|
|
my %classlist=&Apache::lonnet::dump('classlist',$cdom,$cnum); |
my %classlist=&Apache::lonnet::dump('classlist',$cdom,$cnum); |
|
|
my ($checkForError)=keys(%result); |
my ($checkForError)=keys(%classlist); |
if($checkForError=~/^(con_lost|error|no_such_host)/i) { |
if($checkForError=~/^(con_lost|error|no_such_host)/i) { |
$r->print('<h1>Could not access course data</h1>'); |
$r->print('<h1>Could not access course data</h1>'); |
} else { |
} else { |