aboutsummaryrefslogtreecommitdiffstats
path: root/misc/mklist
diff options
context:
space:
mode:
authorGuilhem Moulin <guilhem.moulin@fripost.org>2012-09-29 02:03:21 +0200
committerGuilhem Moulin <guilhem.moulin@fripost.org>2012-09-29 02:03:21 +0200
commit2bece6abde54881bb074dd44e7f87885eab4a777 (patch)
treebde87a2c98476847ab5082facade40062cb52e70 /misc/mklist
parentaa3340e58fc5b993bfc88070edf543a2ed82ef94 (diff)
Proper escaping of URIs.
Diffstat (limited to 'misc/mklist')
-rw-r--r--misc/mklist/INSTALL4
-rwxr-xr-xmisc/mklist/mklist.pl4
2 files changed, 4 insertions, 4 deletions
diff --git a/misc/mklist/INSTALL b/misc/mklist/INSTALL
index 660bcf9..7164217 100644
--- a/misc/mklist/INSTALL
+++ b/misc/mklist/INSTALL
@@ -37,7 +37,7 @@ Postfix's master.cf
mklist-mailman unix - n n - - pipe
flags=FR directory=/opt/fripost-panel/ user=list:list
argv=/opt/fripost-panel/misc/mklist/mklist.pl mailman ${size}
-
+
mklist-schleuder unix - n n - - pipe
flags=FR directory=/opt/fripost-panel/ user=schleuder:schleuder
argv=/opt/fripost-panel/misc/mklist/mklist.pl schleuder ${size}
@@ -50,7 +50,7 @@ Postfix's main.cf
mklist-mailman_destination_concurrency_limit = 1
mklist-mailman_destination_recpipient_limit = 1
mklist-mailman_time_limit = 10m
-
+
mklist-schleuder_destination_concurrency_limit = 1
mklist-schleuder_destination_recpipient_limit = 1
mklist-schleuder_time_limit = 2h
diff --git a/misc/mklist/mklist.pl b/misc/mklist/mklist.pl
index 3223c45..6d0b6b2 100755
--- a/misc/mklist/mklist.pl
+++ b/misc/mklist/mklist.pl
@@ -30,14 +30,14 @@ use lib 'lib';
use Mail::GnuPG;
use MIME::Parser;
use MIME::QuotedPrint;
-use Net::IDN::Encode qw/email_to_ascii/;
+use Net::IDN::Encode 'email_to_ascii';
use Fripost::Schema;
my $transport = shift;
pod2usage(2) unless defined $transport and
grep { $transport eq $_}
qw/mailman schleuder/;
-my $configdir = catdir('/','etc','mklist');
+my $configdir = catdir(qw(/ etc mklist));
my $config = Config::Auto::parse( catfile($configdir, 'config'),
format => "equal" );