# HG changeset patch
# User vimboss
# Date 1257947133 0
# Node ID bce687811199a7866c7728b09f00406ac1294745
# Parent  1fbbe04a950f9ed82b53ddf67d8e034224fc98ad
updated for version 7.2-287

diff --git a/src/if_perl.xs b/src/if_perl.xs
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -720,8 +720,9 @@ ex_perl(eap)
 #ifdef HAVE_SANDBOX
     if (sandbox)
     {
+	safe = perl_get_sv( "VIM::safe", FALSE );
 # ifndef MAKE_TEST  /* avoid a warning for unreachable code */
-	if ((safe = perl_get_sv( "VIM::safe", FALSE )) == NULL || !SvTRUE(safe))
+	if (safe == NULL || !SvTRUE(safe))
 	    EMSG(_("E299: Perl evaluation forbidden in sandbox without the Safe module"));
 	else
 # endif
diff --git a/src/version.c b/src/version.c
--- a/src/version.c
+++ b/src/version.c
@@ -682,6 +682,8 @@ static char *(features[]) =
 static int included_patches[] =
 {   /* Add new patch number below this line */
 /**/
+    287,
+/**/
     286,
 /**/
     285,