X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=perl-module%2FPSPP.xs;fp=perl-module%2FPSPP.xs;h=834ec401f483900d5cd1cb5bfb5d3e08045e7e4a;hb=21559edd9991628d96df331e5b391ca6bade3497;hp=f6afa29b10098ee7614e8fa880cccaf1269b5097;hpb=dff37440177a355bfc0cf9ff56428114e29f5106;p=pspp

diff --git a/perl-module/PSPP.xs b/perl-module/PSPP.xs
index f6afa29b10..834ec401f4 100644
--- a/perl-module/PSPP.xs
+++ b/perl-module/PSPP.xs
@@ -709,7 +709,7 @@ CODE:
  	 fh_create_file (NULL, name, fh_default_properties () );
 
  sri = xmalloc (sizeof (*sri));
- sri->reader = sfm_open_reader (fh, &sri->dict, &sri->opts);
+ sri->reader = sfm_open_reader (fh, NULL, &sri->dict, &sri->opts);
 
  if ( NULL == sri->reader)
  {