From ee1d9d4243e970d102ea4f57bfacb379e5b25b3a Mon Sep 17 00:00:00 2001
From: "Paul Buetow (europa)" <paul@buetow.org>
Date: Sun, 17 May 2015 10:21:56 +0100
Subject: add curlpath

---
 Xerl/Page/Content.pm | 3 ++-
 xerl.conf            | 1 +
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/Xerl/Page/Content.pm b/Xerl/Page/Content.pm
index 6cadd9a..b63d710 100644
--- a/Xerl/Page/Content.pm
+++ b/Xerl/Page/Content.pm
@@ -112,7 +112,8 @@ sub _insertrules {
         # Fetch via LWP::Simple
         #my $got = get($text);
         # Bug in FreeBSD Perl and LWP Module
-        my $got = `curl "$text"`;
+        my $curl = $config->get_curlpath();
+        my $got = `$curl "$text"`;
         if ($!) {
           push @content, "$text: $!";
         } else {
diff --git a/xerl.conf b/xerl.conf
index df4b930..a310825 100644
--- a/xerl.conf
+++ b/xerl.conf
@@ -16,3 +16,4 @@ defaulttemplate=html5
 hidesubhome=1
 hostroot=/usr/local/www/xerlhosts/branches/stable/hosts/
 404=http://paul.buetow.org
+curlpath=/usr/local/bin/curl
-- 
cgit v1.2.3