Consistently use "eq ''" when checking for exception refness
Dagfinn Ilmari Mannsåker [Tue, 29 Oct 2013 17:24:34 +0000 (17:24 +0000)]
lib/DBIx/Class/Storage/TxnScopeGuard.pm

index 844b2cc..09a3fc5 100644 (file)
@@ -25,7 +25,7 @@ sub new {
   # There got to be a saner way of doing this...
   if (defined $@ and "$@" ne '') {
     weaken(
-      $guard->{existing_exception_ref} = (ref $@ ne '') ? $@ : \$@
+      $guard->{existing_exception_ref} = (ref $@ eq '') ? \$@ : $@
     );
   }