From f39309a66020e13892350785bf3feff6907c5ee6 Mon Sep 17 00:00:00 2001
From: Tuncer Ayaz <tuncer.ayaz@gmail.com>
Date: Tue, 3 Dec 2013 19:59:28 +0100
Subject: Write ERROR messages to standard_error device

---
 src/rebar_log.erl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/rebar_log.erl b/src/rebar_log.erl
index 300a615..8be090b 100644
--- a/src/rebar_log.erl
+++ b/src/rebar_log.erl
@@ -30,7 +30,8 @@
          set_level/1,
          error_level/0,
          default_level/0,
-         log/3]).
+         log/3,
+         log/4]).
 
 -define(ERROR_LEVEL, 0).
 -define(WARN_LEVEL,  1).
@@ -54,10 +55,13 @@ set_level(Level) ->
     ok = application:set_env(rebar, log_level, Level).
 
 log(Level, Str, Args) ->
+    log(standard_io, Level, Str, Args).
+
+log(Device, Level, Str, Args) ->
     {ok, LogLevel} = application:get_env(rebar, log_level),
     case should_log(LogLevel, Level) of
         true ->
-            io:format(log_prefix(Level) ++ Str, Args);
+            io:format(Device, log_prefix(Level) ++ Str, Args);
         false ->
             ok
     end.
-- 
cgit v1.1