[! use strict; use Proxmox::Form; use Proxmox::Utils; use Proxmox::ConfigServer; use Proxmox::Config::System; !] [- my $frm = Proxmox::Form->new (\%fdat); my $system_cfg = $fdat{__system_config}; $frm->add_cfg_element('ipconfig', "ext_port", "port", "25", __("External SMTP Port")); $frm->add_cfg_element('ipconfig', "int_port", "port", "26", __("Internal SMTP Port")); $frm->add_element("m3", "hidden"); if ($frm->submit==0) { $frm->load_cfg ($system_cfg); } else { if ($udat{AM} eq 'w') { $frm->save_cfg ($system_cfg); my $conn = Proxmox::ConfigClient::connect (); $conn->rewrite_config_postfix (); $conn->rewrite_config_fetchmail (); $conn->service_cmd ('postfix', 'reload'); } else { $udat{popup_error} = Proxmox::Utils::msg ('nowr'); } } print OUT $frm->out_form; -]