From 0aff0f752fd4a5d342fbb1a9a9192ae239f48b1f Mon Sep 17 00:00:00 2001
From: Magnus Ahltorp <map@kth.se>
Date: Fri, 27 Feb 2015 22:27:12 +0100
Subject: Handle case when no own_key has been defined

---
 src/plop.erl | 13 +++++++++----
 1 file changed, 9 insertions(+), 4 deletions(-)

(limited to 'src/plop.erl')

diff --git a/src/plop.erl b/src/plop.erl
index cfca343..6ff65f8 100644
--- a/src/plop.erl
+++ b/src/plop.erl
@@ -200,9 +200,13 @@ add_auth(Method, Path, Headers, Data) ->
     [{"X-Catlfish-Auth", AuthHeader} | Headers].
 
 get_auth_header(Headers) ->
-    Result = binary_to_list(hackney_headers:get_value("X-Catlfish-Auth", Headers)),
-    lager:debug("received auth header: ~p", [Result]),
-    Result.
+    case hackney_headers:get_value("X-Catlfish-Auth", Headers) of
+        undefined ->
+            undefined;
+        Result when is_binary(Result) ->
+            lager:debug("received auth header: ~p", [Result]),
+            binary_to_list(Result)
+    end.
 
 send_http_request(TreeLeafHash, URL, Headers, RequestBody) ->
     ParentPid = self(),
@@ -243,7 +247,8 @@ send_http_request(TreeLeafHash, URL, Headers, RequestBody) ->
                                               {StatusLine, RespHeaders, Body}}};
                       noauth ->
                           lager:debug("no auth"),
-                          drop
+                          ParentPid ! {http, {RequestId,
+                                              {StatusLine, RespHeaders, Body}}}
                   end
           end),
     RequestId.
-- 
cgit v1.1