From 20aaac18d413cff3a0e46405d40346cd2b6fe19b Mon Sep 17 00:00:00 2001
From: glyn <glyn@8kb.co.uk>
Date: Thu, 6 Aug 2015 13:10:51 +0100
Subject: [PATCH] Mark experimental smartmach feature as enabled to suppress
 warnings in perl 5.18+.

This doesn't mitigate the fact that smartmatch is now considered experimental,
but use of smartmatch in this script is fairly trivial.
---
 slony_failover.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/slony_failover.pl b/slony_failover.pl
index e89bc78..298efe3 100755
--- a/slony_failover.pl
+++ b/slony_failover.pl
@@ -23,6 +23,7 @@
 
 use strict;
 use warnings;
+use experimental 'smartmatch';
 use DBI;
 use Getopt::Long qw/GetOptions/;
 use Data::UUID;
-- 
2.39.2