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 f8479c6da06a641fc5ce8c92a271aa87f25565e2..f6afa29b10098ee7614e8fa880cccaf1269b5097 100644 (file)
--- 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/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>
 #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);
 
  i18n_init ();
  msg_set_handler (message_handler, NULL);

- settings_init (0, 0);
+ settings_init ();

  fh_init ();
 
 SV *
  fh_init ();
 
 SV *