@@ -129,31 +129,32 @@ terminate(_Reason, _State) ->
129
129
ok .
130
130
131
131
handle_call ({load_files , FileNames }, _From , State ) ->
132
- set_keys_from_files (FileNames ),
133
- {reply , ok , State };
132
+ set_keys_from_files (FileNames ),
133
+ {reply , ok , State };
134
134
135
135
handle_call ({set , Key , Value }, _From , State ) ->
136
- application :set_env (basho_bench , Key , Value ),
137
- {reply , ok , State };
136
+ application :set_env (basho_bench , Key , Value ),
137
+ {reply , ok , State };
138
138
handle_call ({get , Key }, _From , State ) ->
139
- Value = application :get_env (basho_bench , Key ),
140
- {reply , Value , State }.
139
+ Value = application :get_env (basho_bench , Key ),
140
+ {reply , Value , State }.
141
141
142
142
handle_cast (_Cast , State ) ->
143
- {noreply , State }.
143
+ {noreply , State }.
144
144
145
145
handle_info (_Info , State ) ->
146
- {noreply , State }.
147
-
146
+ {noreply , State }.
147
+
148
148
set_keys_from_files (Files ) ->
149
- KVs = [ case file :consult (File ) of
150
- {ok , Terms } ->
151
- Terms ;
152
- {error , Reason } ->
153
- ? FAIL_MSG (" Failed to parse config file ~s : ~p \n " , [File , Reason ]),
154
- throw (invalid_config ),
155
- notokay
156
- end || File <- Files ],
149
+ KVs = [
150
+ case file :consult (File ) of
151
+ {ok , Terms } ->
152
+ Terms ;
153
+ {error , Reason } ->
154
+ ? FAIL_MSG (" Failed to parse config file ~s : ~p \n " , [File , Reason ]),
155
+ throw (invalid_config ),
156
+ notokay
157
+ end || File <- Files ],
157
158
FlatKVs = lists :flatten (KVs ),
158
159
[application :set_env (basho_bench , Key , Value ) || {Key , Value } <- FlatKVs ].
159
160
0 commit comments