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/ce551a5d55b12c8b377e9331fbfe4d67790934e4

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;