version 1.146, 2004/06/04 22:06:07
|
version 1.147, 2004/06/04 22:56:45
|
Line 517 sub get_tolrange {
|
Line 517 sub get_tolrange {
|
sub get_sigrange { |
sub get_sigrange { |
my ($sig)=@_; |
my ($sig)=@_; |
&Apache::lonxml::debug("Got a sig of :$sig:"); |
&Apache::lonxml::debug("Got a sig of :$sig:"); |
|
my $courseid=$ENV{'request.course.id'}; |
|
if (lc($ENV{"course.$courseid.disablesigfigs"}) eq 'yes') { |
|
return (15,0); |
|
} |
my $sig_lbound; |
my $sig_lbound; |
my $sig_ubound; |
my $sig_ubound; |
if ($sig eq '') { |
if ($sig eq '') { |