X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Fsrc%2Fperl.c;h=58643f0fa24707009068a5e361b4d4f94ddb33be;hb=9fa3eec7bb2e6a14a0b62dbc713c0ba5b2b5cd34;hp=5239f3d513943cc94ed3716f2302f02fa9e3ab94;hpb=f9ba5e2255cf18092750fffacb6a9603571a2be5;p=exim.git

diff --git a/src/src/perl.c b/src/src/perl.c
index 5239f3d51..58643f0fa 100644
--- a/src/src/perl.c
+++ b/src/src/perl.c
@@ -62,7 +62,7 @@ XS(xs_expand_string)
   ST(0) = sv_newmortal();
   if (str != NULL)
     sv_setpv(ST(0), CCS  str);
-  else if (!expand_string_forcedfail)
+  else if (!f.expand_string_forcedfail)
     croak("syntax error in Exim::expand_string argument: %s",
       expand_string_message);
 }