ezmlm-web/ezmlm-web
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

r423@erker: lars | 2008-09-28 18:54:05 +0200

Browse source 
web interface code:
 * use separate 'getconfig' function for GpgEzmlm settings
 * fix minor perl warning
This commit is contained in:
lars 2008-09-29 20:45:00 +00:00
parent 7b09ad4540
commit dc655d0683
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
ezmlm-web.cgi
View file

@ -943,7 +943,7 @@ sub set_pagedata {
# list specific configuration - use defaults if no list is selected
if ($list) {
&set_pagedata4options($list, $list->getconfig);
&set_pagedata4options($list, $list->getconfig());
&set_pagedata4list($list, &get_list_part());
} else {
&set_pagedata4options($list, $DEFAULT_OPTIONS);
@ -1073,7 +1073,7 @@ sub set_pagedata_gpgezmlm {
$pagedata->setValue("Data.List.Features.GpgEzmlm", 1);
# read the configuration
%config = $list->getconfig();
%config = $list->getconfig_special();
foreach $item (keys %config) {
$pagedata->setValue("Data.List.Options.gpgezmlm_" . lc($item), $config{$item});
}
@ -2366,8 +2366,9 @@ sub update_config_common {
$q->param('msgsize_min_value') : 0;
$list->setpart('msgsize', "$maxsize:$minsize");
} else {
# restore the original value, as ezmlm-make always overrides these values :(((
$list->setpart('msgsize', "$old_msgsize");
# restore the original value, as ezmlm-make always overrides these
# values :(((
$list->setpart('msgsize', "$old_msgsize") if (defined($old_msgsize));
}
# update charset