Skip to content
This repository was archived by the owner on Dec 11, 2024. It is now read-only.
This repository was archived by the owner on Dec 11, 2024. It is now read-only.

Cleanse B::HV::save of B::C #24

Open
@toddr

Description

@toddr

commit bc45f606db184ac124304ff71a6e79e17915d972
Author: Todd Rinaldo toddr@cpan.org
Date: Fri Oct 23 19:25:03 2015 -0500

Don't save the HV if it's a B::C space
diff --git a/lib/B/C/OverLoad/B/HV.pm b/lib/B/C/OverLoad/B/HV.pm
index 3ec792b..e11ac94 100644
--- a/lib/B/C/OverLoad/B/HV.pm
+++ b/lib/B/C/OverLoad/B/HV.pm
@@ -40,6 +40,7 @@ sub save {
     my $magic;

     if ($name) {
+        return if ( $name =~ /^B::C($|::)/ );

         # It's a stash. See issue 79 + test 46
         debug(

Metadata

Metadata

Assignees

No one assigned

    Type

    No type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions