From: Ben Pfaff <blp@cs.stanford.edu>
Date: Thu, 26 Jan 2012 04:55:02 +0000 (-0800)
Subject: perl-module: Fix bad arguments in call to settings_init().
X-Git-Tag: v0.7.9~14
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=07a7777e44d30dc5495112b818211a57212ebf76;p=pspp-builds.git

perl-module: Fix bad arguments in call to settings_init().

Found by clang.
Reported-by: Jeremy Lavergne <jeremy@lavergne.gotdns.org>
---

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 *