Prefer "use Exporter qw(import)" to inheriting from it

[debbugs.git] / Debbugs / Estraier.pm

diff --git a/Debbugs/Estraier.pm b/Debbugs/Estraier.pm
index 5987fe9ec5ddf1f5485157fa407b5444573fb0c1..7ada02d77302b1cf8875e9675aba8a6d4ded7fd7 100644 (file)
--- a/Debbugs/Estraier.pm
+++ b/Debbugs/Estraier.pm
@@ -28,7 +28,7 @@ None known.
 use warnings;
 use strict;
 use vars qw($VERSION $DEBUG %EXPORT_TAGS @EXPORT_OK @EXPORT);
-use base qw(Exporter);
+use Exporter qw(import);
 use Debbugs::Log;
 use Search::Estraier;
 use Debbugs::Common qw(getbuglocation getbugcomponent make_list);