if these are internal use only, why are they in the public docs

diff --git a/lib/Class/MOP.pm b/lib/Class/MOP.pm
index 6ee4ec3..e9bfbd5 100644 (file)
--- a/lib/Class/MOP.pm
+++ b/lib/Class/MOP.pm
@@ -926,18 +926,6 @@ See L<Class::MOP::Instance> for more details.
 
 Note that this module does not export any constants or functions.
 
-=head2 Constants
-
-=over 4
-
-=item I<Class::MOP::IS_RUNNING_ON_5_10>
-
-We set this constant depending on what version perl we are on, this
-allows us to take advantage of new 5.10 features and stay backwards
-compatible.
-
-=back
-
 =head2 Utility functions
 
 Note that these are all called as B<functions, not methods>.
@@ -992,36 +980,6 @@ This will return the metaclass of the given instance or class name.  If the
 class lacks a metaclass, no metaclass will be initialized, and C<undef> will be
 returned.
 
-=item B<Class::MOP::check_package_cache_flag($pkg)>
-
-B<NOTE: DO NOT USE THIS FUNCTION, IT IS FOR INTERNAL USE ONLY!>
-
-This will return an integer that is managed by L<Class::MOP::Class> to
-determine if a module's symbol table has been altered.
-
-In Perl 5.10 or greater, this flag is package specific. However in
-versions prior to 5.10, this will use the C<PL_sub_generation>
-variable which is not package specific.
-
-=item B<Class::MOP::load_first_existing_class(@class_names)>
-
-=item B<Class::MOP::load_first_existing_class($classA, \%optionsA?, $classB, ...)>
-
-B<NOTE: DO NOT USE THIS FUNCTION, IT IS FOR INTERNAL USE ONLY!>
-
-Given a list of class names, this function will attempt to load each
-one in turn.
-
-If it finds a class it can load, it will return that class' name.  If
-none of the classes can be loaded, it will throw an exception.
-
-Additionally, you can pass a hash reference with options after each
-class name. Currently, only C<-version> is recognized and will ensure
-that the loaded class has at least the required version. If the class
-version is not sufficient, an exception will be raised.
-
-See also L</Class Loading Options>.
-
 =back
 
 =head2 Metaclass cache functions

diff --git a/xt/release/pod-coverage.t b/xt/release/pod-coverage.t
index b0548e5..c9e4eb1 100644 (file)
--- a/xt/release/pod-coverage.t
+++ b/xt/release/pod-coverage.t
@@ -19,8 +19,11 @@ my %trustme = (
     'Class::MOP' => [
         'DEBUG_NO_META',
         'HAVE_ISAREV',
+        'IS_RUNNING_ON_5_10',
         'subname',
         'in_global_destruction',
+        'check_package_cache_flag',
+        'load_first_existing_class',
     ],
     'Class::MOP::Attribute' => ['process_accessors'],
     'Class::MOP::Class'     => [