diff options
Diffstat (limited to 'mail/razor-agents/files/patch-lib::Razor2::Client::Agent.pm')
| -rw-r--r-- | mail/razor-agents/files/patch-lib::Razor2::Client::Agent.pm | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/mail/razor-agents/files/patch-lib::Razor2::Client::Agent.pm b/mail/razor-agents/files/patch-lib::Razor2::Client::Agent.pm deleted file mode 100644 index 4903fa5be7b1..000000000000 --- a/mail/razor-agents/files/patch-lib::Razor2::Client::Agent.pm +++ /dev/null @@ -1,25 +0,0 @@ ---- lib/Razor2/Client/Agent.pm.orig Sun Nov 3 21:07:21 2002 -+++ lib/Razor2/Client/Agent.pm Sun Nov 3 21:08:17 2002 -@@ -753,10 +753,11 @@ - foreach my $file (@ARGV) { - my $fh; - my @message = (); -- if (ref $file) { -- $fh = $file -+ if ($file eq '-') { -+ $fh = \*STDIN; - } else { -- open $fh, "<$file" or return $self->error("Can't open $file: $!"); -+ open FH, "<$file" or return $self->error("Can't open $file: $!"); -+ $fh = \*FH; - } - next unless defined(my $line = <$fh>); - if ($line =~ /^From /) { -@@ -969,6 +969,7 @@ - my @fns; - if (opendir D,$self->{razorhome}) { - @fns = map "$self->{razorhome}/$_", grep /^server\.[\S]+\.conf$/, readdir D; -+ @fns = map { /^(\S+)$/, $1 } @fns; # untaint - closedir D; - } - foreach (@fns) { |