loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.35, 2001/09/21 19:59:49	version 1.36, 2001/10/05 21:50:25
Line 19 package Apache::lonparmset;	Line 19 package Apache::lonparmset;
use strict;	use strict;
use Apache::lonnet;	use Apache::lonnet;
use Apache::Constants qw(:common :http REDIRECT);	use Apache::Constants qw(:common :http REDIRECT);
	use Apache::loncommon;
use GDBM_File;	use GDBM_File;


Line 186 sub assessparms {	Line 187 sub assessparms {
$pssymb=&Apache::lonnet::symbread($url);	$pssymb=&Apache::lonnet::symbread($url);
$pscat='all';	$pscat='all';
$pschp='';	$pschp='';
	} elsif ($ENV{'form.symb'}) {
	$pssymb=$ENV{'form.symb'};
	$pscat='all';
	$pschp='';
} else {	} else {
$ENV{'form.url'}='';	$ENV{'form.url'}='';
}	}
Line 822 sub handler {	Line 827 sub handler {
$r->send_http_header;	$r->send_http_header;
return OK;	return OK;
}	}
	&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'});
# ----------------------------------------------------- Needs to be in a course	# ----------------------------------------------------- Needs to be in a course

if (($ENV{'request.course.id'}) &&	if (($ENV{'request.course.id'}) &&