Don't lowercase first letter in reason string

diff --git a/rebar.config b/rebar.config
index 703d6686081a5389a2666b936805e48a09b59260..c8497697bf57a644eab5358ebe3563d17f67779b 100644 (file)
--- a/rebar.config
+++ b/rebar.config
@@ -27,7 +27,7 @@
        {idna, ".*", {git, "https://github.com/benoitc/erlang-idna", {tag, "6.0.0"}}},
         {xmpp, ".*", {git, "https://github.com/processone/xmpp", {tag, "1.4.2"}}},
         {fast_yaml, ".*", {git, "https://github.com/processone/fast_yaml", {tag, "1.0.21"}}},
-       {yconf, ".*", {git, "https://github.com/processone/yconf", {tag, "1.0.1"}}},
+       {yconf, ".*", {git, "https://github.com/processone/yconf", "f5f1ab4"}},
         {jiffy, ".*", {git, "https://github.com/davisp/jiffy", {tag, "0.14.8"}}},
         {p1_oauth2, ".*", {git, "https://github.com/processone/p1_oauth2", {tag, "0.6.5"}}},
         {pkix, ".*", {git, "https://github.com/processone/pkix", {tag, "1.0.4"}}},

diff --git a/src/econf.erl b/src/econf.erl
index 994f7e96eb0272c5596e43e717d8a284b5059bf9..6b21b111377f3a2dad3b3434e78ddc3b130fbf4d 100644 (file)
--- a/src/econf.erl
+++ b/src/econf.erl
@@ -148,8 +148,7 @@ format_error({bad_enum, Known, Bad} = Why, Ctx) ->
 format_error({bad_yaml, _, _} = Why, _) ->
     format_error(Why);
 format_error(Reason, Ctx) ->
-    [H|T] = format_error(Reason),
-    yconf:format_ctx(Ctx) ++ ": " ++ [string:to_lower(H)|T].
+    yconf:format_ctx(Ctx) ++ ": " ++ format_error(Reason).
 
 format_error({bad_db_type, _, Atom}) ->
     format("unsupported database: ~ts", [Atom]);