From c6d93418f1ecae092b8c55136ee7b56351165767 Mon Sep 17 00:00:00 2001
From: Peter Lemenkov <lemenkov@gmail.com>
Date: Sun, 10 Mar 2013 14:36:24 +0400
Subject: [PATCH 1/1] Properly use lager
Signed-off-by: Peter Lemenkov <lemenkov@gmail.com>
---
src/bitcask_file.erl | 11 ++---------
1 file changed, 2 insertions(+), 9 deletions(-)
diff --git a/src/bitcask_file.erl b/src/bitcask_file.erl
index e2e5e59..fa2c961 100644
--- a/src/bitcask_file.erl
+++ b/src/bitcask_file.erl
@@ -22,6 +22,7 @@
-module(bitcask_file).
-compile(export_all).
-behaviour(gen_server).
+-compile([{parse_transform, lager_transform}]).
%% API
@@ -112,7 +113,7 @@ handle_call({file_open, Owner, Filename, Opts}, _From, State) ->
{_, true} ->
[read, write, exclusive, raw, binary, read_ahead]
end,
- [warn("Bitcask file option '~p' not supported~n", [Opt])
+ [lager:warning("Bitcask file option '~p' not supported~n", [Opt])
|| Opt <- [o_sync],
proplists:get_bool(Opt, Opts)],
case file:open(Filename, Mode) of
@@ -183,11 +184,3 @@ check_owner({Pid, _Mref}, #state{owner=Owner}) ->
throw(owner_invariant_failed),
ok
end.
-
-warn(Fmt, Args) ->
- case code:which(lager) of
- non_existing ->
- io:format(Fmt, Args);
- _ ->
- lager:warning(Fmt, Args)
- end.
--
1.8.1.4