summaryrefslogtreecommitdiff
path: root/src/if_perl.xs
diff options
context:
space:
mode:
authorBram Moolenaar <Bram@vim.org>2009-07-14 14:04:54 +0000
committerBram Moolenaar <Bram@vim.org>2009-07-14 14:04:54 +0000
commit3f947ead6fb56a4ff5101069fb56e70476ca9905 (patch)
treea9f195b974fe3cd5d855c7588a1d3d20b30a7ddd /src/if_perl.xs
parentd31aca26de3c3ba2cd359bdd8065b40b73d551a8 (diff)
downloadvim-git-3f947ead6fb56a4ff5101069fb56e70476ca9905.tar.gz
updated for version 7.2-231v7.2.231
Diffstat (limited to 'src/if_perl.xs')
-rw-r--r--src/if_perl.xs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/if_perl.xs b/src/if_perl.xs
index a589f8fd0..926adcef5 100644
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -720,9 +720,11 @@ ex_perl(eap)
#ifdef HAVE_SANDBOX
if (sandbox)
{
+# ifndef MAKE_TEST /* avoid a warning for unreachable code */
if ((safe = perl_get_sv( "VIM::safe", FALSE )) == NULL || !SvTRUE(safe))
EMSG(_("E299: Perl evaluation forbidden in sandbox without the Safe module"));
else
+# endif
{
PUSHMARK(SP);
XPUSHs(safe);