summaryrefslogtreecommitdiffstats
path: root/sentry.pl
diff options
context:
space:
mode:
authorDylan William Hardison <dylan@hardison.net>2016-07-01 05:32:40 +0200
committerDylan William Hardison <dylan@hardison.net>2016-09-12 19:03:27 +0200
commite6bf4cacb10f86077fe898349485f5c7ab9fb4b6 (patch)
tree24a4973f71f38e0cd7788a25817142ab6c05ed3e /sentry.pl
parent591e2dabe136e9a9190f3a67c89349cb794ae9a9 (diff)
downloadbugzilla-e6bf4cacb10f86077fe898349485f5c7ab9fb4b6.tar.gz
bugzilla-e6bf4cacb10f86077fe898349485f5c7ab9fb4b6.tar.xz
Bug 1283930 - Add Makefile.PL & local/lib/perl5 support to bmo/master + local symlink to data/ directory
Diffstat (limited to 'sentry.pl')
-rwxr-xr-xsentry.pl10
1 files changed, 6 insertions, 4 deletions
diff --git a/sentry.pl b/sentry.pl
index 95cd1846f..8d8b878e9 100755
--- a/sentry.pl
+++ b/sentry.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
@@ -13,15 +13,17 @@
# called by Bugzilla::Sentry
#
+use 5.10.1;
use strict;
use warnings;
+# exit early if there's nothing to send
+use FindBin qw($RealBin);
+use lib ("$RealBin/.", "$RealBin/lib", "$RealBin/local/lib/perl5");
+
BEGIN {
delete $ENV{SERVER_SOFTWARE};
- # exit early if there's nothing to send
- use FindBin qw($Bin);
- use lib $Bin, "$Bin/lib";
use Bugzilla::Constants;
exit(0) unless glob(bz_locations()->{error_reports} . '/*.dump');
}