From 5b4ab50af1406a5c70700eeb3a366257f27357b4 Mon Sep 17 00:00:00 2001
From: Jeffrey Ryan Thalhammer <jeff@thaljef.org>
Date: Mon, 3 Nov 2014 11:48:01 -0800
Subject: [PATCH] Add test case to cover GH #192.

The parsing of hash constructors has been improved
in PPI and this bug is now fixed via adamkennedy/PPI#92.
---
 .../ProhibitCommaSeparatedStatements.run                  | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/t/ValuesAndExpressions/ProhibitCommaSeparatedStatements.run b/t/ValuesAndExpressions/ProhibitCommaSeparatedStatements.run
index 0d6513ace..72d236c42 100644
--- a/t/ValuesAndExpressions/ProhibitCommaSeparatedStatements.run
+++ b/t/ValuesAndExpressions/ProhibitCommaSeparatedStatements.run
@@ -291,6 +291,14 @@ sub new {
     return bless { foo => 1, bar => 2 }, __PACKAGE__;
 }
 
+#-----------------------------------------------------------------------------
+
+## name Hashref seen as block (GH #192)
+## failures 0
+## cut
+
+my $o = shift || {'file' => 1, 'exec' => 1};
+
 #-----------------------------------------------------------------------------
 # Local Variables:
 #   mode: cperl