From db8412d1f71a3498c6214fa255f28e3ee1e54a56 Mon Sep 17 00:00:00 2001
From: Eric <ericbmerritt@gmail.com>
Date: Fri, 26 Oct 2012 12:38:36 -0500
Subject: fix bug in constraint parsing

This fixes a bug in parsing invalid constraint values

Signed-off-by: Jordan Wilberding <diginux@gmail.com>
---
 src/rcl_release.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/rcl_release.erl b/src/rcl_release.erl
index dd3e479..3b5694d 100644
--- a/src/rcl_release.erl
+++ b/src/rcl_release.erl
@@ -302,9 +302,9 @@ parse_goal0(_, E = {error, _}) ->
 parse_goal1(Release = #release_t{annotations=Annots,  goals=Goals},
             Constraint0, NewAnnots) ->
    case rcl_goal:parse(Constraint0) of
-      {error, _} ->
+      {fail, _} ->
            ?RCL_ERROR({failed_to_parse, Constraint0});
-       Constraint1 ->
+       {ok, Constraint1} ->
            case get_app_name(Constraint1) of
                E1 = {error, _} ->
                    E1;
-- 
cgit v1.2.3