From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 16 Jul 2017 15:44:58 +0000 (+0200)
Subject: common: include from cwd to work around perl v5.26 security
X-Git-Tag: v1.11~16
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/v1.10-62-gce551a5d55?hp=1e896b32c218647ddfa2699c4c1ef0a9306f42cb

common: include from cwd to work around perl v5.26 security

Find site modules in the working directory as was default up to perl v5.24.
Sufficiently safe as all code should be executed from the document root.
---

diff --git a/common.inc.plp b/common.inc.plp
index 3c92817..68ada33 100644
--- a/common.inc.plp
+++ b/common.inc.plp
@@ -34,6 +34,8 @@ BEGIN {
 		Alert("<strong>Fatal error</strong>: $html.");
 	};
 
+	push @INC, '.';
+
 	# user request
 	our $Dev = $ENV{HTTP_HOST} =~ /\bdev\./;
 	our ($file) = $ENV{SCRIPT_FILENAME} =~ m{ ([^/]+) \.plp$ }x;