X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=perl-module%2Flib%2FPSPP.pm;h=69e467074555ea9edabf88eeffb8c438017a9bf4;hb=49ce384421d791119e04cbdb6bd4ae4ec30740f4;hp=f4310eee7eaac47e1e48d935f9939a38ee099581;hpb=7da2b01528493bd9f84a706e71fafb9ae8797ab7;p=pspp-builds.git

diff --git a/perl-module/lib/PSPP.pm b/perl-module/lib/PSPP.pm
index f4310eee..69e46707 100644
--- a/perl-module/lib/PSPP.pm
+++ b/perl-module/lib/PSPP.pm
@@ -2,8 +2,6 @@ use 5.008008;
 use strict;
 use warnings;
 
-do 'pspp-vers.pl' || die "No version set";
-
 =head1 NAME
 
 PSPP - Perl extension to PSPP
@@ -22,9 +20,13 @@ system files.
 None by default.
 
 =cut
+BEGIN {
+	do 'pspp-vers.pl' || die "No version set";
+	require XSLoader;
+	XSLoader::load('PSPP', $PSPP::VERSION);
+}
 
-require XSLoader;
-XSLoader::load('PSPP', $PSPP::VERSION);
+PSPP::onBoot($PSPP::VERSION);
 
 =pod