diff options
author | Dylan William Hardison <dylan@hardison.net> | 2016-07-01 05:32:40 +0200 |
---|---|---|
committer | Dylan William Hardison <dylan@hardison.net> | 2016-09-12 19:03:27 +0200 |
commit | e6bf4cacb10f86077fe898349485f5c7ab9fb4b6 (patch) | |
tree | 24a4973f71f38e0cd7788a25817142ab6c05ed3e /sentry.pl | |
parent | 591e2dabe136e9a9190f3a67c89349cb794ae9a9 (diff) | |
download | bugzilla-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-x | sentry.pl | 10 |
1 files changed, 6 insertions, 4 deletions
@@ -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'); } |