goddamn data

beerriot · May 25, 2010 · a605c48 · a605c48
1 parent 63daac6
commit a605c48
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/apps/luwak/src/luwak_block.erl b/apps/luwak/src/luwak_block.erl
@@ -12,6 +12,8 @@ create(Riak, Data) ->
   Obj = riak_object:new(?N_BUCKET, skerl:hexhash(?HASH_LEN, Data), Value),
   {Riak:put(Obj,2), Obj}.
 
+data(Val) when is_list(Val) ->
+  proplists:get_value(data, Val);
 data(Object) ->
   proplists:get_value(data, riak_object:get_value(Object)).