File suppress_warning.diff of Package perl-Class-MethodMaker

--- lib/Class/MethodMaker/Engine.pm
+++ lib/Class/MethodMaker/Engine.pm	2008/06/11 12:03:16
@@ -778,6 +778,8 @@
         *{$methname} = $code;
         # Generate a unique stash name for the sub.  Use a preceding space
         # to avoid collisions with anything in the Perl space.
+        # Turn off warnings about 'Name " Foo::Bar" used only once'.
+        no warnings "once";
         Class::MethodMaker::set_sub_name($code, $target, $name, " ${target}::${name}");
       }
     } else {