moose

diff --git a/lib/Moose.pm b/lib/Moose.pm
index 4d6f87c..ac8eb5e 100644 (file)
--- a/lib/Moose.pm
+++ b/lib/Moose.pm
@@ -136,6 +136,10 @@ use Sub::Exporter;
         }
     );
     
+    foreach my $name (keys %exports) {
+        $exports{$name} = subname "Moose::${name}" => $exports{$name};
+    }
+    
     my $exporter = Sub::Exporter::build_exporter({ 
         exports => \%exports,
         groups  => {