version 1.5, 2003/06/05 13:01:32
|
version 1.6, 2003/06/18 20:11:21
|
Line 12
|
Line 12
|
# Delete the 'course.initialization.not.run' course environment |
# Delete the 'course.initialization.not.run' course environment |
Apache::lonnet::put('environment', {'course.helper.not.run' => 0}, |
Apache::lonnet::put('environment', {'course.helper.not.run' => 0}, |
$crsdom, $crsnum); |
$crsdom, $crsnum); |
|
Apache::lonnet::coursedescription($ENV{'request.course.id'}); |
|
|
$helper->{DATA}->{GETVAL} = sub { |
$helper->{DATA}->{GETVAL} = sub { |
my @resultlist = &Apache::lonnet::get('environment', [shift()], |
my @resultlist = &Apache::lonnet::get('environment', [shift()], |
Line 24
|
Line 25
|
if (&{$helper->{DATA}->{GETVAL}}($name) ne $val) { |
if (&{$helper->{DATA}->{GETVAL}}($name) ne $val) { |
&Apache::lonnet::put('environment', {$name=>$val}, |
&Apache::lonnet::put('environment', {$name=>$val}, |
$helper->{DATA}->{DOM}, |
$helper->{DATA}->{DOM}, |
$helper->{DATA}->{CRS}); |
$helper->{DATA}->{CRS}); |
|
# Try to fix bug 1757 |
|
Apache::lonnet::coursedescription($ENV{'request.course.id'}); |
return 1; |
return 1; |
} else { |
} else { |
return 0; |
return 0; |