From 07a7777e44d30dc5495112b818211a57212ebf76 Mon Sep 17 00:00:00 2001
From: Ben Pfaff <blp@cs.stanford.edu>
Date: Wed, 25 Jan 2012 20:55:02 -0800
Subject: [PATCH] perl-module: Fix bad arguments in call to settings_init().

Found by clang.
Reported-by: Jeremy Lavergne <jeremy@lavergne.gotdns.org>
---
 perl-module/PSPP.xs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/perl-module/PSPP.xs b/perl-module/PSPP.xs
index f8479c6d..f6afa29b 100644
--- a/perl-module/PSPP.xs
+++ b/perl-module/PSPP.xs
@@ -44,6 +44,7 @@
 #include <data/attributes.h>
 #include <data/file-handle-def.h>
 #include <data/identifier.h>
+#include <data/settings.h>
 #include <data/sys-file-writer.h>
 #include <data/sys-file-reader.h>
 #include <data/value.h>
@@ -182,7 +183,7 @@ CODE:
 
  i18n_init ();
  msg_set_handler (message_handler, NULL);
- settings_init (0, 0);
+ settings_init ();
  fh_init ();
 
 SV *
-- 
2.30.2