]> git.netwichtig.de Git - user/henk/code/inspircd.git/commitdiff
Use the standard Perl prelude in ModuleManager.
authorPeter Powell <petpow@saberuk.com>
Fri, 24 Mar 2017 22:00:00 +0000 (22:00 +0000)
committerPeter Powell <petpow@saberuk.com>
Sat, 25 Mar 2017 00:54:25 +0000 (00:54 +0000)
modulemanager

index 9f9c0334415c59e9fbaf68bd85611ff5cae55b83..1ac0c936a1078abcdea86c3f46dfdeb140932e45 100755 (executable)
 #
 
 
-use strict;
-use warnings FATAL => qw(all);
-
-use make::common;
-
 BEGIN {
+       require 5.10.0;
        unless (eval "use LWP::Simple; 1") {
                die "Your system is missing the LWP::Simple Perl module!";
        }
        unless (eval "use Crypt::SSLeay; 1" || eval "use IO::Socket::SSL; 1") {
                die "Your system is missing the Crypt::SSLeay or IO::Socket::SSL Perl modules!";
        }
-
 }
 
-use File::Basename;
-use LWP::Simple;
+use feature ':5.10';
+use strict;
+use warnings FATAL => qw(all);
+
+use File::Basename qw(basename);
+use FindBin        qw($RealDir);
+
+use lib $RealDir;
+use make::common;
 
 my %installed;
 # $installed{name} = $version