From 3186223fd182a6c4d334b520e2df5377b79cc2a0 Mon Sep 17 00:00:00 2001
From: alisdair sullivan <alisdairsullivan@yahoo.ca>
Date: Wed, 10 Aug 2011 23:18:42 -0700
Subject: [PATCH] better guarding of opts parsing

---
 src/jsx_verify.erl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/jsx_verify.erl b/src/jsx_verify.erl
index 26cd5d1..c91d453 100644
--- a/src/jsx_verify.erl
+++ b/src/jsx_verify.erl
@@ -66,11 +66,13 @@ extract_parser_opts([K|Rest], Acc) ->
 
 parse_opts(Opts) -> parse_opts(Opts, #verify_opts{}).
 
-parse_opts([{repeated_keys, Val}|Rest], Opts) ->
+parse_opts([{repeated_keys, Val}|Rest], Opts)
+        when Val =:= true; Val =:= false ->
     parse_opts(Rest, Opts#verify_opts{repeated_keys = Val});
 parse_opts([repeated_keys|Rest], Opts) ->
     parse_opts(Rest, Opts#verify_opts{repeated_keys = true});
-parse_opts([{naked_values, Val}|Rest], Opts) ->
+parse_opts([{naked_values, Val}|Rest], Opts)
+        when Val =:= true; Val =:= false ->
     parse_opts(Rest, Opts#verify_opts{naked_values = Val});
 parse_opts([naked_values|Rest], Opts) ->
     parse_opts(Rest, Opts#verify_opts{naked_values = true});