* lib/Qpsmtpd.pm
(_load_plugins): split plugin_line using awk style "magic" whitespace git-svn-id: https://svn.perl.org/qpsmtpd/trunk@399 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
e331f6b248
commit
f72647a44c
@ -190,7 +190,7 @@ sub _load_plugins {
|
|||||||
|
|
||||||
my @ret;
|
my @ret;
|
||||||
for my $plugin_line (@plugins) {
|
for my $plugin_line (@plugins) {
|
||||||
my ($plugin, @args) = split /\s+/, $plugin_line;
|
my ($plugin, @args) = split ' ', $plugin_line;
|
||||||
|
|
||||||
if (lc($plugin) eq '$include') {
|
if (lc($plugin) eq '$include') {
|
||||||
my $inc = shift @args;
|
my $inc = shift @args;
|
||||||
|
Loading…
Reference in New Issue
Block a user