From: Matt S Trout <mst@shadowcat.co.uk>
Date: Tue, 29 May 2012 18:42:54 +0000 (+0000)
Subject: operator precedence fail
X-Git-Tag: v0.001001~50
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=70a578ac56c770246c2fbc409926f868ac8d520c;p=scpubgit%2FObject-Remote.git

operator precedence fail
---

diff --git a/lib/Object/Remote/Connection.pm b/lib/Object/Remote/Connection.pm
index 70c1409..d45556d 100644
--- a/lib/Object/Remote/Connection.pm
+++ b/lib/Object/Remote/Connection.pm
@@ -137,7 +137,7 @@ sub _serialize {
     my $flat = $self->_encode($self->_deobjectify($data));
     warn "$$ >>> ${flat}\n" if $DEBUG;
     $flat;
-  } or do {
+  } || do {
     my $err = $@; # won't get here if the eval doesn't die
     # don't keep refs to new things
     delete @{$self->local_objects_by_id}{@New_Ids};