[Jifty-commit] r6126 - in Net-Jifty/trunk: .

[Jifty commits]

Author: sartak
Date: Tue Dec 16 22:43:53 2008
New Revision: 6126

Modified:
   Net-Jifty/trunk/   (props changed)
   Net-Jifty/trunk/Makefile.PL
   Net-Jifty/trunk/lib/Net/Jifty.pm

Log:
 r77611 at onn:  sartak | 2008-12-16 22:43:50 -0500
 Make Email::Address more optional as well. Geez.


Modified: Net-Jifty/trunk/Makefile.PL
==============================================================================
--- Net-Jifty/trunk/Makefile.PL	(original)
+++ Net-Jifty/trunk/Makefile.PL	Tue Dec 16 22:43:53 2008
@@ -8,7 +8,6 @@
 requires        'YAML';
 requires        'URI';
 requires        'Encode';
-requires        'Email::Address';
 requires        'Term::ReadKey';
 
 build_requires  'Test::More';
@@ -25,6 +24,10 @@
         recommends('Path::Class'),
         recommends('Cwd'),
     ],
+    'Email address comparison' => [
+        -default => 0,
+        recommends('Email::Address'),
+    ],
 );
 
 WriteAll;

Modified: Net-Jifty/trunk/lib/Net/Jifty.pm
==============================================================================
--- Net-Jifty/trunk/lib/Net/Jifty.pm	(original)
+++ Net-Jifty/trunk/lib/Net/Jifty.pm	Tue Dec 16 22:43:53 2008
@@ -13,8 +13,6 @@
 use Encode;
 use Fcntl qw(:mode);
 
-use Email::Address;
-
 has site => (
     is            => 'rw',
     isa           => 'Str',
@@ -494,6 +492,8 @@
 
     # so, both are defined
 
+    require Email::Address;
+
     for ($a, $b) {
         $_ = 'nobody at localhost' if $_ eq 'nobody' || /<nobody>/;
         my ($email) = Email::Address->parse($_);