From: glyn <glyn@8kb.co.uk>
Date: Thu, 6 Aug 2015 12:10:51 +0000 (+0100)
Subject: Mark experimental smartmach feature as enabled to suppress warnings in perl 5.18+.
X-Git-Url: https://git.8kb.co.uk/?a=commitdiff_plain;ds=sidebyside;p=slony-i%2Fslony_failover

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.
---

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;