loncom/interface/domainprefs.pm - diff

Return to domainprefs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.91, 2009/03/31 16:59:01	version 1.92, 2009/04/22 12:42:16
Line 242 sub handler {	Line 242 sub handler {
}	}

sub process_changes {	sub process_changes {
my ($r,$dom,$confname,$action,$roles,%domconfig) = @_;	my ($r,$dom,$confname,$action,$roles,$values) = @_;
	my %domconfig;
	if (ref($values) eq 'HASH') {
	%domconfig = %{$values};
	}
my $output;	my $output;
if ($action eq 'login') {	if ($action eq 'login') {
$output = &modify_login($r,$dom,$confname,%domconfig);	$output = &modify_login($r,$dom,$confname,%domconfig);