[Bps-public-commit] r11600 - in SVN-PropDB: .

[jesse at bestpractical.com]

Author: jesse
Date: Sun Apr  6 18:55:30 2008
New Revision: 11600

Modified:
   SVN-PropDB/   (props changed)
   SVN-PropDB/Makefile.PL
   SVN-PropDB/t/01-dependencies.t

Log:
 r29402 at 68-247-203-8:  jesse | 2008-04-06 12:20:52 -1000
 * Dependency tweaking
 


Modified: SVN-PropDB/Makefile.PL
==============================================================================
--- SVN-PropDB/Makefile.PL	(original)
+++ SVN-PropDB/Makefile.PL	Sun Apr  6 18:55:30 2008
@@ -24,14 +24,24 @@
 requires('RT::Client::REST::User');
 requires('SVB::Record');
 requires('Term::ReadKey');
+requires('Digest::SHA1');
+requires('LWP::Simple');
+requires('URI');
+
 requires('SVN::Core'); # SVN::Repos SVN::Fs SVN::Ra SVN::Delta::Editor SVN::Client SVN::Delta
 features(
         'Crazy debugging tools' => [
             -default => 1,
             recommends => 'Devel::Gladiator'
         ]
+    'Hiveminder sync' => [
+            -default => 0,
+            requires => 'Net::Jifty',
+            requires => 'Jifty',
+    ]
     );
 
+
 all_from('lib/Prophet.pm');
 
 WriteAll();

Modified: SVN-PropDB/t/01-dependencies.t
==============================================================================
--- SVN-PropDB/t/01-dependencies.t	(original)
+++ SVN-PropDB/t/01-dependencies.t	Sun Apr  6 18:55:30 2008
@@ -49,7 +49,7 @@
     ok( open( MAKEFILE, "Makefile.PL" ), "Opened Makefile" );
     my $data = <MAKEFILE>;
     close(FILE);
-    while ( $data =~ /^\s*?(?:requires|recommends)\('([\w:]+)'(?:\s*=>\s*['"]?([\d\.]+)['"]?)?.*?(?:#(.*))?$/gm ) {
+    while ( $data =~ /^\s*?(?:requires|recommends).*?([\w:]+)'(?:\s*=>\s*['"]?([\d\.]+)['"]?)?.*?(?:#(.*))?$/gm ) {
         $required{$1} = $2;
         if ( defined $3 and length $3 ) {
             $required{$_} = undef for split ' ', $3;