Control: tags -1 patch It turned out I managed to find a workaround. Putting it below for ulterior reference if need be; few more details are available on upstream bug tracker:
-------8<--------------8<--------------8<--------------8<-------
--- libdancer2-plugin-database-perl.orig/t/lib/TestApp.pm
+++ libdancer2-plugin-database-perl/t/lib/TestApp.pm
@@ -209,6 +209,9 @@
var connection_failed => 1;
};
get '/database_connection_failed_fires' => sub {
+ # Avoid catching an old handle which may not have expired yet
+ database()->disconnect;
+ sleep 0.2;
# Give a ridiculous database filename which should never exist in order to
# force a connection failure
my $handle = database({
------->8-------------->8-------------->8-------------->8-------
Have a nice day, :)
--
Étienne Mollier <emoll...@emlwks999.eu>
Fingerprint: 8f91 b227 c7d6 f2b1 948c 8236 793c f67e 8f0d 11da
Sent from /dev/pts/3, please excuse my verbosity.
On air: Chicago - Beginnings
signature.asc
Description: PGP signature
