[Bps-public-commit] r14469 - in Prophet/trunk: .

sartak at bestpractical.com sartak at bestpractical.com
Thu Jul 24 05:00:27 EDT 2008


Author: sartak
Date: Thu Jul 24 05:00:26 2008
New Revision: 14469

Modified:
   Prophet/trunk/   (props changed)
   Prophet/trunk/lib/Prophet/PropChange.pm
   Prophet/trunk/lib/Prophet/Replica.pm

Log:
 r64996 at onn:  sartak | 2008-07-24 04:59:37 -0400
 UNIVERSAL::require-- for quietly consuming errors


Modified: Prophet/trunk/lib/Prophet/PropChange.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/PropChange.pm	(original)
+++ Prophet/trunk/lib/Prophet/PropChange.pm	Thu Jul 24 05:00:26 2008
@@ -47,7 +47,7 @@
     my $old  = $self->old_value;
     my $new  = $self->new_value;
 
-    if (!defined($old) {
+    if (!defined($old)) {
         return qq{Property "$name" was added, value "$new".};
     }
     elsif (!defined($new)) {

Modified: Prophet/trunk/lib/Prophet/Replica.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/Replica.pm	(original)
+++ Prophet/trunk/lib/Prophet/Replica.pm	Thu Jul 24 05:00:26 2008
@@ -49,7 +49,8 @@
 our $MERGETICKET_METATYPE = '_merge_tickets';
 
 for ( __PACKAGE__->core_replica_types) {
-   $_->require; # Require here, rather than with the autorequire from Module::Pluggable as that goes too far
+   $_->require or die $@; # Require here, rather than with the autorequire from Module::Pluggable as that goes too far
+
    # and tries to load Prophet::Replica::SVN::ReplayEditor;
    __PACKAGE__->register_replica_scheme(scheme => $_->scheme, class => $_) 
 }



More information about the Bps-public-commit mailing list