From: Michael Tremer <michael.tremer@ipfire.org>
Date: Tue, 3 May 2022 11:54:17 +0000 (+0000)
Subject: ovpnmain.cgi: Load all modules at the beginning
X-Git-Tag: v2.27-core170~61^2~26
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=c63a54f0908f8dcce2fde30d4476e82dbc2c3bfd;p=ipfire-2.x.git

ovpnmain.cgi: Load all modules at the beginning

Although Perl modules tend to take a long time to load, it is better to
do this at the beginning so that loading the script will show any
errors.

Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>
---

diff --git a/html/cgi-bin/ovpnmain.cgi b/html/cgi-bin/ovpnmain.cgi
index 8581d63bec..78b92a1513 100644
--- a/html/cgi-bin/ovpnmain.cgi
+++ b/html/cgi-bin/ovpnmain.cgi
@@ -23,6 +23,9 @@
 ###
 use CGI;
 use CGI qw/:standard/;
+use Imager::QRCode;
+use MIME::Base32;
+use MIME::Base64;
 use Net::DNS;
 use Net::Ping;
 use Net::Telnet;
@@ -2638,9 +2641,6 @@ else
 } elsif ($cgiparams{'ACTION'} eq $Lang::tr{'show otp qrcode'}) {
    &General::readhasharray("${General::swroot}/ovpn/ovpnconfig", \%confighash);
 
-   use MIME::Base32;
-   use MIME::Base64;
-   use Imager::QRCode;
    my $qrcode = Imager::QRCode->new(
       size          => 6,
       margin        => 0,