From 604d0391ba2d372f8de6efd364e9978fb11e4f92 Mon Sep 17 00:00:00 2001
From: Amitai Schlair <schmonz-web-ikiwiki@schmonz.com>
Date: Sun, 14 Jun 2015 21:35:51 -0400
Subject: Squelch regex deprecation warnings from Perl 5.22.

Specifically:

"Unescaped left brace in regex is deprecated, passed through in regex"
---
 t/inline.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 't/inline.t')

diff --git a/t/inline.t b/t/inline.t
index f2ffbbc2f..9bad525be 100755
--- a/t/inline.t
+++ b/t/inline.t
@@ -52,7 +52,7 @@ $blob = readfile("t/tmp/out/friends.html");
 like($blob, qr{\Q$add_new_post\E}, 'postform=yes forces postform');
 like($blob, qr{<input type="hidden" name="from" value="friends"},
 	'implicit rootpage is /friends');
-like($blob, qr[this page is {friends/garrus}.*this page is {friends/liara}]s,
+like($blob, qr[this page is \{friends/garrus}.*this page is \{friends/liara}]s,
 	'first two pages in desired sort order are present');
 unlike($blob, qr{friends/(?:midna|telma)},
 	'pages excluded by show should not be present');
@@ -62,7 +62,7 @@ unlike($blob, qr{\Q$add_new_post\E}, 'default is no postform');
 
 $blob = readfile("t/tmp/out/enemies.html");
 unlike($blob, qr{\Q$add_new_post\E}, 'postform=no forces no postform');
-like($blob, qr[this page is {enemies/zant}.*this page is {enemies/rachni}]s,
+like($blob, qr[this page is \{enemies/zant}.*this page is \{enemies/rachni}]s,
 	'first two pages in reversed sort order are present');
 unlike($blob, qr{enemies/(?:benezia|geth)},
 	'pages excluded by show should not be present');
-- 
cgit v1.2.3