From 4ced7e7ea1ba26ba5f5d87cddb4436299d93be64 Mon Sep 17 00:00:00 2001
From: gemmaro <gemmaro.dev@gmail.com>
Date: Tue, 8 Oct 2024 21:38:52 +0900
Subject: [PATCH] Remove DynaLoader

* lib/Locale/Po4a/Man.pm, lib/Locale/Po4a/Po.pm,
lib/Locale/Po4a/TransTractor.pm: Remove DynaLoader from the is-a
relationships.  DynaLoader was introduced in
0a4e526ddd3a3a5e9cc92f1832833d21a37b314c for performance reasons.
However the XS was removed in
dbbc6d2c763ce89a13af003871ecffa01a8edc30, about 4 years ago.
* lib/Locale/Po4a/Man.pm, lib/Locale/Po4a/Po.pm,
lib/Locale/Po4a/TransTractor.pm: Don't try to use XS.
---
 lib/Locale/Po4a/Man.pm          | 6 +-----
 lib/Locale/Po4a/Po.pm           | 6 +-----
 lib/Locale/Po4a/TransTractor.pm | 7 +------
 3 files changed, 3 insertions(+), 16 deletions(-)

diff --git a/lib/Locale/Po4a/Man.pm b/lib/Locale/Po4a/Man.pm
index ff4157d3d..b41d232fd 100644
--- a/lib/Locale/Po4a/Man.pm
+++ b/lib/Locale/Po4a/Man.pm
@@ -393,7 +393,6 @@ under the terms of GPL v2.0 or later (see the COPYING file).
 =cut
 
 package Locale::Po4a::Man;
-use DynaLoader;
 
 use 5.16.0;
 use strict;
@@ -401,12 +400,9 @@ use warnings;
 
 require Exporter;
 use vars qw(@ISA @EXPORT);
-@ISA    = qw(Locale::Po4a::TransTractor DynaLoader);
+@ISA    = qw(Locale::Po4a::TransTractor);
 @EXPORT = qw();                                        #  new initialize);
 
-# Try to use a C extension if present.
-eval('bootstrap Locale::Po4a::Man "0.30"');
-
 use Locale::Po4a::TransTractor;
 use Locale::Po4a::Common;
 
diff --git a/lib/Locale/Po4a/Po.pm b/lib/Locale/Po4a/Po.pm
index 3da2c8855..dcd510dd0 100644
--- a/lib/Locale/Po4a/Po.pm
+++ b/lib/Locale/Po4a/Po.pm
@@ -101,21 +101,17 @@ use IO::File;
 require Exporter;
 
 package Locale::Po4a::Po;
-use DynaLoader;
 
 use Locale::Po4a::Common qw(wrap_msg wrap_mod wrap_ref_mod dgettext);
 
 use subs qw(makespace);
 use vars qw(@ISA @EXPORT_OK);
-@ISA       = qw(Exporter DynaLoader);
+@ISA       = qw(Exporter);
 @EXPORT    = qw(%debug);
 @EXPORT_OK = qw(&move_po_if_needed);
 
 use Locale::Po4a::TransTractor;
 
-# Try to use a C extension if present.
-eval("bootstrap Locale::Po4a::Po $Locale::Po4a::TransTractor::VERSION");
-
 use 5.16.0;
 use strict;
 use warnings;
diff --git a/lib/Locale/Po4a/TransTractor.pm b/lib/Locale/Po4a/TransTractor.pm
index 7b6112433..7366d68a4 100644
--- a/lib/Locale/Po4a/TransTractor.pm
+++ b/lib/Locale/Po4a/TransTractor.pm
@@ -3,7 +3,6 @@
 require Exporter;
 
 package Locale::Po4a::TransTractor;
-use DynaLoader;
 
 sub import { }
 
@@ -12,16 +11,12 @@ use strict;
 use warnings;
 
 use subs qw(makespace);
-use vars qw($VERSION @ISA @EXPORT);
+use vars qw($VERSION @EXPORT);
 $VERSION = "0.74-alpha";
-@ISA     = qw(DynaLoader);
 @EXPORT  = qw(new process translate
   read write readpo writepo
   getpoout setpoout get_in_charset get_out_charset handle_yaml);
 
-# Try to use a C extension if present.
-eval("bootstrap Locale::Po4a::TransTractor $VERSION");
-
 use Carp qw(croak confess);
 use Locale::Po4a::Po;
 use Locale::Po4a::Common;