initial commit of file from CVS for e-smith-qmail on Wed 12 Jul 09:06:46 BST 2023
This commit is contained in:
14
root/etc/e-smith/templates-user/.qmail/00setup
Normal file
14
root/etc/e-smith/templates-user/.qmail/00setup
Normal file
@@ -0,0 +1,14 @@
|
||||
{
|
||||
# vim: ft=perl:
|
||||
die "USERNAME not set." unless defined ($USERNAME);
|
||||
|
||||
use esmith::AccountsDB;
|
||||
$adb = esmith::AccountsDB->open_ro or die "Couldn't open AccountsDB";
|
||||
|
||||
$user = $adb->get($USERNAME) or die "No user $USERNAME in AccountsDB";
|
||||
|
||||
%props = $user->props;
|
||||
$props{EmailForward} ||= 'local';
|
||||
|
||||
$OUT = '';
|
||||
}
|
Reference in New Issue
Block a user