From c2415b2f3e337c072c4d5534d3f2b282d88d7230 Mon Sep 17 00:00:00 2001
From: Magnus Ahltorp <map@kth.se>
Date: Tue, 21 Oct 2014 17:16:50 +0200
Subject: Break include dependency on plop.hrl

---
 src/catlfish.erl |  1 -
 src/v1.erl       | 11 ++++-------
 2 files changed, 4 insertions(+), 8 deletions(-)

(limited to 'src')

diff --git a/src/catlfish.erl b/src/catlfish.erl
index e261824..ae4da9d 100644
--- a/src/catlfish.erl
+++ b/src/catlfish.erl
@@ -3,7 +3,6 @@
 
 -module(catlfish).
 -export([add_chain/2, entries/2, entry_and_proof/2]).
--include("$CTROOT/plop/include/plop.hrl").
 
 -define(PROTOCOL_VERSION, 0).
 
diff --git a/src/v1.erl b/src/v1.erl
index ba5c456..535fc8f 100644
--- a/src/v1.erl
+++ b/src/v1.erl
@@ -9,8 +9,6 @@
  'get-sth-consistency'/3, 'get-proof-by-hash'/3, 'get-entries'/3,
  'get-roots'/3, 'get-entry-and-proof'/3]).
 
--include("$CTROOT/plop/include/plop.hrl").
-
 %% Public functions, i.e. part of URL.
 'add-chain'(SessionID, _Env, Input) ->
     R = case (catch jiffy:decode(Input)) of
@@ -34,11 +32,10 @@
     niy(SessionID).
 
 'get-sth'(SessionID, _Env, _Input) ->
-    #sth{
-       treesize = Treesize,
-       timestamp = Timestamp,
-       roothash = Roothash,
-       signature = Signature} = plop:sth(),
+    { Treesize,
+       Timestamp,
+       Roothash,
+       Signature} = plop:sth(),
     R = [{tree_size, Treesize},
          {timestamp, Timestamp},
          {sha256_root_hash, base64:encode(Roothash)},
-- 
cgit v1.1