version 1.49, 2006/06/22 13:02:22
|
version 1.50, 2006/06/28 16:06:06
|
Line 100 sub handler {
|
Line 100 sub handler {
|
['-1','86400','604800','2592000','7776000', |
['-1','86400','604800','2592000','7776000', |
'15552000','31104000'])); |
'15552000','31104000'])); |
# if called from loncreateuser, report sections, then close |
# if called from loncreateuser, report sections, then close |
my (%loaditem,$seclist,$groupslist,$roleslist,$rolesnameslist,$sec_element, |
my (%loaditem,$seclist,$groupslist,$roleslist,$rolesnameslist, |
$grplist_element,$accesslist,$accessnameslist); |
$accesslist,$accessnameslist); |
my $sec_element = 'currsec'; |
my $sec_element = 'currsec'; |
my $grplist_element = 'groups'; |
my $grplist_element = 'groups'; |
my $num_sections = 0; |
my $num_sections = 0; |