From ccea0b67f379f666f22c171a57533aaf261dc473 Mon Sep 17 00:00:00 2001
From: LCD 47 <lcd047@gmail.com>
Date: Sun, 7 Apr 2019 15:40:06 +0300
Subject: [PATCH] Checker perl6: fix bit rot.

The interpreter now uses PERL6_EXCEPTIONS_HANDLER instead of
RAKUDO_EXCEPTIONS_HANDLER to format errors as JSON.
---
 plugin/syntastic.vim            | 2 +-
 syntax_checkers/perl6/perl6.vim | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/plugin/syntastic.vim b/plugin/syntastic.vim
index 2af130b6..17fc86a4 100644
--- a/plugin/syntastic.vim
+++ b/plugin/syntastic.vim
@@ -19,7 +19,7 @@ if has('reltime')
     lockvar! g:_SYNTASTIC_START
 endif
 
-let g:_SYNTASTIC_VERSION = '3.9.0-33'
+let g:_SYNTASTIC_VERSION = '3.9.0-34'
 lockvar g:_SYNTASTIC_VERSION
 
 " Sanity checks {{{1
diff --git a/syntax_checkers/perl6/perl6.vim b/syntax_checkers/perl6/perl6.vim
index fe1dd10b..f00f228f 100644
--- a/syntax_checkers/perl6/perl6.vim
+++ b/syntax_checkers/perl6/perl6.vim
@@ -88,7 +88,7 @@ function! SyntaxCheckers_perl6_perl6_GetLocList() dict " {{{1
     return SyntasticMake({
         \ 'makeprg': makeprg,
         \ 'errorformat': errorformat,
-        \ 'env': { 'RAKUDO_EXCEPTIONS_HANDLER': 'JSON' },
+        \ 'env': { 'PERL6_EXCEPTIONS_HANDLER': 'JSON', 'RAKUDO_EXCEPTIONS_HANDLER': 'JSON' },
         \ 'defaults': { 'bufnr': bufnr(''), 'type': 'E' },
         \ 'returns': [0, 1],
         \ 'preprocess': 'perl6',