From 6a036c9e698db34f651afb111b38bd8b181c3bce Mon Sep 17 00:00:00 2001 From: Slaven Rezic Date: Fri, 6 Dec 2013 15:20:03 +0100 Subject: [PATCH] case insensitive regexp for error message (array vs. ARRAY) --- t/10_invalid.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/10_invalid.t b/t/10_invalid.t index 5e080b6..c1a118e 100644 --- a/t/10_invalid.t +++ b/t/10_invalid.t @@ -527,13 +527,13 @@ like($@, qr/Usage: Net::ZooKeeper::set_acl\(zkh, path, acl_arr, \.\.\.\)/, eval { $zkh->set_acl($node_path, 'foo'); }; -like($@, qr/acl_arr is not an array reference/, +like($@, qr/acl_arr is not an array reference/i, 'set_acl(): invalid ACL array reference'); eval { $zkh->set_acl($node_path, {}); }; -like($@, qr/acl_arr is not an array reference/, +like($@, qr/acl_arr is not an array reference/i, 'set_acl(): invalid ACL array reference to hash'); eval { -- 1.7.9.5