Insulate DBIC::Carp from rogue can() overrides
[dbsrgits/DBIx-Class.git] / t / 35exception_inaction.t
index 2a3023b..0f775f4 100644 (file)
@@ -72,6 +72,7 @@ ESCAPE:
   $schema->storage->ensure_connected;
   $schema->storage->_dbh->disconnect;
 
+  # silences "exitting sub via last"
   local $SIG{__WARN__} = sub {};
 
   $schema->exception_action(sub {