summaryrefslogtreecommitdiff
path: root/mailman/mklist.pl
diff options
context:
space:
mode:
Diffstat (limited to 'mailman/mklist.pl')
-rwxr-xr-xmailman/mklist.pl5
1 files changed, 3 insertions, 2 deletions
diff --git a/mailman/mklist.pl b/mailman/mklist.pl
index ff62787..8c7e72c 100755
--- a/mailman/mklist.pl
+++ b/mailman/mklist.pl
@@ -28,10 +28,11 @@ $listowners ||= $ENV{'LISTOWNERS'};
$listowners ||= "'" . $listowner . "'" or die "LISTOWNER(S) missing";
while (<>) {
- # Replace keywords - execept in comments
+ # Replace keywords - except in comments
s/^([^#]*)LISTNAME/$1$listname/g;
s/^([^#]*)LISTDESC/$1$listdesc/g;
- s/^([^#]*)LISTHOST/$1$listhost/g;
+ s/^([^#]*)LISTHOST/$1$listhost/g if ($listhost);
+ s/^([^#]*)LISTHOST/#$1/g unless ($listhost);
s/^([^#]*)SENDERS/$1$senders/g;
s/^([^#]*)SENDERFILTERS/$1$senderfilters/g;
s/^([^#]*)LISTOWNERS/$1$listowners/g;