From b35d374f486c3dcb1b2ba8ed5909903a9b34fc5b Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Sun, 21 Jul 2013 11:45:35 -0400
Subject: default these to 1

---
 t/try/lib/Try.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 't')

diff --git a/t/try/lib/Try.pm b/t/try/lib/Try.pm
index 20325aa..fc70082 100644
--- a/t/try/lib/Try.pm
+++ b/t/try/lib/Try.pm
@@ -24,7 +24,7 @@ sub try_parser {
 
     lex_read_space;
 
-    die "syntax error" unless lex_peek(1) eq '{';
+    die "syntax error" unless lex_peek eq '{';
     $try = parse_block;
 
     lex_read_space;
@@ -32,7 +32,7 @@ sub try_parser {
     if (lex_peek(6) =~ /^catch\b/) {
         lex_read(5);
         lex_read_space;
-        die "syntax error" unless lex_peek(1) eq '{';
+        die "syntax error" unless lex_peek eq '{';
         $catch = parse_block;
     }
 
@@ -41,7 +41,7 @@ sub try_parser {
     if (lex_peek(8) =~ /^finally\b/) {
         lex_read(7);
         lex_read_space;
-        die "syntax error" unless lex_peek(1) eq '{';
+        die "syntax error" unless lex_peek eq '{';
         $finally = parse_block;
     }
 
-- 
cgit v1.2.3-54-g00ecf