From 561115aa93985bbbcb2bb60381b3adbbefdaf53c Mon Sep 17 00:00:00 2001
From: Linus Nordberg <linus@nordberg.se>
Date: Wed, 29 Oct 2014 15:03:40 +0100
Subject: Whitespace and long lines.

---
 src/db.erl       |  3 ++-
 src/frontend.erl | 16 +++++++++++-----
 2 files changed, 13 insertions(+), 6 deletions(-)

(limited to 'src')

diff --git a/src/db.erl b/src/db.erl
index fcc3f38..cb1e618 100644
--- a/src/db.erl
+++ b/src/db.erl
@@ -7,7 +7,8 @@
 %% API.
 -export([start_link/0, stop/0]).
 -export([add/4, add/2, add_entryhash/2, add_index/2, set_treesize/1, size/0]).
--export([get_by_index/1, get_by_indices/3, get_by_leaf_hash/1, get_by_entry_hash/1, entry_for_leafhash/1, leafhash_for_index/1]).
+-export([get_by_index/1, get_by_indices/3, get_by_leaf_hash/1]).
+-export([get_by_entry_hash/1, entry_for_leafhash/1, leafhash_for_index/1]).
 %% gen_server callbacks.
 -export([init/1, handle_call/3, terminate/2, handle_cast/2, handle_info/2,
          code_change/3]).
diff --git a/src/frontend.erl b/src/frontend.erl
index 8d0eccd..4043373 100644
--- a/src/frontend.erl
+++ b/src/frontend.erl
@@ -12,8 +12,12 @@ sendentry(SessionID, _Env, Input) ->
                    {error, E} ->
                        html("sendentry: bad input:", E);
                    {PropList} ->
-                       LogEntry = base64:decode(proplists:get_value(<<"entry">>, PropList)),
-                       TreeLeafHash = base64:decode(proplists:get_value(<<"treeleafhash">>, PropList)),
+                       LogEntry = base64:decode(
+                                    proplists:get_value(
+                                      <<"entry">>, PropList)),
+                       TreeLeafHash = base64:decode(
+                                        proplists:get_value(
+                                          <<"treeleafhash">>, PropList)),
 
                        ok = db:add(TreeLeafHash, LogEntry),
                        binary_to_list(
@@ -28,8 +32,10 @@ sendlog(SessionID, _Env, Input) ->
                        html("sendentry: bad input:", E);
                    {PropList} ->
                        Start = proplists:get_value(<<"start">>, PropList),
-                       Hashes = lists:map(fun (S) -> base64:decode(S) end, proplists:get_value(<<"hashes">>, PropList)),
-                       
+                       Hashes = lists:map(fun (S) -> base64:decode(S) end,
+                                          proplists:get_value(
+                                            <<"hashes">>, PropList)),
+
                        Indices = lists:seq(Start, Start + length(Hashes) - 1),
                        lists:foreach(fun ({Hash, Index}) ->
                                              ok = db:add_index(Hash, Index)
@@ -48,7 +54,7 @@ sendsth(SessionID, _Env, Input) ->
                        Treesize = proplists:get_value(<<"tree_size">>, PropList),
 
                        ok = db:set_treesize(Treesize),
-                       
+
                        ht:reset_tree([db:size() - 1]),
 
                        binary_to_list(
-- 
cgit v1.1