Correct some dialyzer warnings

src/error_logger_lager_h.erl

@@ -39,7 +39,7 @@
         %% how many messages we've received this second
         mps = 0 :: non_neg_integer(),
         %% the current second
-        lasttime = os:timestamp() :: os:timestamp(),
+        lasttime = os:timestamp() :: erlang:timestamp(),
         %% count of dropped messages this second
         dropped = 0 :: non_neg_integer()
     }).
@@ -73,7 +73,7 @@
 set_high_water(N) ->
     gen_event:call(error_logger, ?MODULE, {set_high_water, N}, infinity).
 
--spec init(any()) -> {ok, {}}.
+-spec init(any()) -> {ok, #state{}}.
 init([HighWaterMark]) ->
     {ok, #state{hwm=HighWaterMark}}.
 

src/lager_app.erl

@@ -40,7 +40,8 @@ start(_StartType, _StartArgs) ->
         undefined ->
             ok;
         {ok, Threshold} when is_integer(Threshold), Threshold >= 0 ->
-            _ = supervisor:start_child(lager_handler_watcher_sup, [lager_event, lager_backend_throttle, Threshold]);
+            _ = supervisor:start_child(lager_handler_watcher_sup, [lager_event, lager_backend_throttle, Threshold]),
+            ok;
         {ok, BadThreshold} ->
             error_logger:error_msg("Invalid value for 'async_threshold': ~p~n", [BadThreshold]),
             throw({error, bad_config})