Fix key error variable.

[catacomb-perl] / Catacomb.pm

diff --git a/Catacomb.pm b/Catacomb.pm
index 8c2fb73907beccaa75d244f26955faadde15e87a..816dd03ef50df533318da5c7f275a45f25cc46be 100644 (file)
--- a/Catacomb.pm
+++ b/Catacomb.pm
@@ -79,6 +79,8 @@ $EXPORT_TAGS{"mp"} = [qw(mp gf mp_loadb mp_loadl mp_loadb2c mp_loadl2c
 $EXPORT_TAGS{"pgen"} = [qw(newprime primegen limleegen
                           filterstepper $rabin_tester
                           $pg_events $pg_evspin $pg_subev)];
+$EXPORT_TAGS{"key"} = [qw($keyerror)];
+
 Exporter::export_ok_tags(keys %EXPORT_TAGS);
 
 #----- That's all, folks ----------------------------------------------------