1 files changed, 23 insertions, 0 deletions
diff --git a/t/008-gvstash-bug.t b/t/008-gvstash-bug.t
new file mode 100644
index 0000000..fac7a7d
--- /dev/null
+++ b/t/008-gvstash-bug.t
@@ -0,0 +1,23 @@
+use strict;
+use warnings;
+use Test::Fatal;
+use Test::More 0.88;
+use lib 't/lib';
+use Test::Class::Load 'load_class';
+
+is( exception {
+    load_class('Class::Load::Stash::Sub');
+}, undef, 'Loaded Class::Load::Stash::Sub' );
+
+Class::Load::Stash->can('a_method');
+
+is( exception {
+    load_class('Class::Load::Stash');
+}, undef, 'Loaded Class::Load::Stash' );
+
+is( exception {
+    Class::Load::Stash->a_method;
+}, undef,
+'Actually loaded Class::Load::Stash - we were not fooled by mention of this stash in Class::Load::Stash::Sub' );
+
+done_testing;