From: Hans Dieter Pearcey <hdp@weftsoar.net>
Date: Wed, 22 Jul 2009 16:45:13 +0000 (-0700)
Subject: move module list out into its own file for ease-of-munging
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=07827b719e802c93bf3c53c4edc8d0487236f87c;p=gitmo%2Fmoose-dev-utils.git

move module list out into its own file for ease-of-munging
---

diff --git a/cpan-stable-modules b/cpan-stable-modules
new file mode 100644
index 0000000..fb285a1
--- /dev/null
+++ b/cpan-stable-modules
@@ -0,0 +1,82 @@
+Moose::Autobox
+MooseX::Accessors::ReadWritePrivate
+MooseX::App::Cmd
+MooseX::Async
+MooseX::Attribute::ENV
+MooseX::AttributeHelpers
+MooseX::Attribute::Prototype
+MooseX::Attributes::Curried
+MooseX::Blessed::Reconstruct
+MooseX::ClassAttribute
+MooseX::Clone
+MooseX::ConfigFromFile
+MooseX::Constructor::AllErrors
+MooseX::Contract
+MooseX::Control
+MooseX::CurriedHandles
+MooseX::Daemonize
+MooseX::Declare
+MooseX::DeepAccessors
+MooseX::DOM
+MooseX::Emulate::Class::Accessor::Fast
+MooseX::FollowPBP
+MooseX::Getopt
+MooseX::GlobRef::Object
+MooseX::InsideOut
+MooseX::Iterator
+MooseX::KeyedMutex
+MooseX::LazyLogDispatch
+MooseX::LogDispatch
+MooseX::Log::Log4perl
+MooseX::MakeImmutable
+MooseX::Meta::TypeConstraint::ForceCoercion
+MooseX::MetaDescription
+MooseX::MethodAttributes
+MooseX::Method::Signatures
+MooseX::MultiInitArg
+MooseX::MultiMethods
+MooseX::MutatorAttributes
+MooseX::NaturalKey
+MooseX::NonMoose
+MooseX::Object::Pluggable
+MooseX::Param
+MooseX::Params::Validate
+MooseX::Plaggerize
+MooseX::POE
+MooseX::Policy::SemiAffordanceAccessor
+MooseX::Q4MLog
+MooseX::Role::Cmd
+MooseX::Role::Matcher
+MooseX::Role::Parameterized
+MooseX::Role::TraitConstructor
+MooseX::Role::XMLRPC::Client
+MooseX::Scaffold
+MooseX::SemiAffordanceAccessor
+MooseX::SimpleConfig
+MooseX::Singleton
+MooseX::Storage
+MooseX::Storage::Format::XML::Simple
+MooseX::StrictConstructor
+MooseX::Struct
+MooseX::Templated
+MooseX::Timestamp
+MooseX::Traits
+MooseX::Traits::Attribute::CascadeClear
+MooseX::Types
+MooseX::Types::Authen::Passphrase
+MooseX::Types::Common
+MooseX::Types::Data::GUID
+MooseX::Types::DateTime
+MooseX::Types::IO
+MooseX::Types::Path::Class
+MooseX::Types::Set::Object
+MooseX::Types::Structured
+MooseX::Types::URI
+MooseX::Types::UUID
+MooseX::Types::VariantTable
+MooseX::WithCache
+MooseX::Workers
+MooseX::YAML
+Fey::ORM
+KiokuDB
+Catalyst
diff --git a/cpan-stable-smolder b/cpan-stable-smolder
index a5be27a..e59c70a 100755
--- a/cpan-stable-smolder
+++ b/cpan-stable-smolder
@@ -25,92 +25,15 @@ if ( -f $LOGFILE ) {
 
 open my $log, '>', $LOGFILE || die "Could not open $LOGFILE because $!";
 
-test_all_modules(
-    qw[
-        Moose::Autobox
-        MooseX::Accessors::ReadWritePrivate
-        MooseX::App::Cmd
-        MooseX::Async
-        MooseX::Attribute::ENV
-        MooseX::AttributeHelpers
-        MooseX::Attribute::Prototype
-        MooseX::Attributes::Curried
-        MooseX::Blessed::Reconstruct
-        MooseX::ClassAttribute
-        MooseX::Clone
-        MooseX::ConfigFromFile
-        MooseX::Constructor::AllErrors
-        MooseX::Contract
-        MooseX::Control
-        MooseX::CurriedHandles
-        MooseX::Daemonize
-        MooseX::Declare
-        MooseX::DeepAccessors
-        MooseX::DOM
-        MooseX::Emulate::Class::Accessor::Fast
-        MooseX::FollowPBP
-        MooseX::Getopt
-        MooseX::GlobRef::Object
-        MooseX::InsideOut
-        MooseX::Iterator
-        MooseX::KeyedMutex
-        MooseX::LazyLogDispatch
-        MooseX::LogDispatch
-        MooseX::Log::Log4perl
-        MooseX::MakeImmutable
-        MooseX::Meta::TypeConstraint::ForceCoercion
-        MooseX::MetaDescription
-        MooseX::MethodAttributes
-        MooseX::Method::Signatures
-        MooseX::MultiInitArg
-        MooseX::MultiMethods
-        MooseX::MutatorAttributes
-        MooseX::NaturalKey
-        MooseX::NonMoose
-        MooseX::Object::Pluggable
-        MooseX::Param
-        MooseX::Params::Validate
-        MooseX::Plaggerize
-        MooseX::POE
-        MooseX::Policy::SemiAffordanceAccessor
-        MooseX::Q4MLog
-        MooseX::Role::Cmd
-        MooseX::Role::Matcher
-        MooseX::Role::Parameterized
-        MooseX::Role::TraitConstructor
-        MooseX::Role::XMLRPC::Client
-        MooseX::Scaffold
-        MooseX::SemiAffordanceAccessor
-        MooseX::SimpleConfig
-        MooseX::Singleton
-        MooseX::Storage
-        MooseX::Storage::Format::XML::Simple
-        MooseX::StrictConstructor
-        MooseX::Struct
-        MooseX::Templated
-        MooseX::Timestamp
-        MooseX::Traits
-        MooseX::Traits::Attribute::CascadeClear
-        MooseX::Types
-        MooseX::Types::Authen::Passphrase
-        MooseX::Types::Common
-        MooseX::Types::Data::GUID
-        MooseX::Types::DateTime
-        MooseX::Types::IO
-        MooseX::Types::Path::Class
-        MooseX::Types::Set::Object
-        MooseX::Types::Structured
-        MooseX::Types::URI
-        MooseX::Types::UUID
-        MooseX::Types::VariantTable
-        MooseX::WithCache
-        MooseX::Workers
-        MooseX::YAML
-        Fey::ORM
-        KiokuDB
-        Catalyst
-        ]
-);
+my $MODULE_LIST_FILE = ( cwd . '/cpan-stable-modules' );
+
+my @modules;
+{
+    open my $fh, $MODULE_LIST_FILE or die "Can't open $MODULE_LIST_FILE: $!";
+    @modules = map { chomp; $_ } <$fh>;
+}
+
+test_all_modules(@modules); 
 
 close $log;