4
%% Copyright Ericsson AB 1996-2009. All Rights Reserved.
4
%% Copyright Ericsson AB 1996-2011. All Rights Reserved.
6
6
%% The contents of this file are subject to the Erlang Public License,
7
7
%% Version 1.1, (the "License"); you may not use this file except in
8
8
%% compliance with the License. You should have received a copy of the
9
9
%% Erlang Public License along with this software. If not, it can be
10
10
%% retrieved online at http://www.erlang.org/.
12
12
%% Software distributed under the License is distributed on an "AS IS"
13
13
%% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
14
14
%% the License for the specific language governing rights and limitations
15
15
%% under the License.
19
19
-module(kernel_config_SUITE).
21
-include("test_server.hrl").
23
-export([all/1, sync/1]).
25
-export([init/1, fini/1]).
28
[{conf, init, [sync], fini}].
32
init(Config) when is_list(Config) ->
37
fini(Config) when is_list(Config) ->
21
-include_lib("test_server/include/test_server.hrl").
23
-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, sync/1]).
25
-export([init_per_suite/1, end_per_suite/1]).
27
suite() -> [{ct_hooks,[ts_install_cth]}].
35
init_per_group(_GroupName, Config) ->
38
end_per_group(_GroupName, Config) ->
42
init_per_suite(doc) -> [];
43
init_per_suite(suite) -> [];
44
init_per_suite(Config) when is_list(Config) ->
47
end_per_suite(doc) -> [];
48
end_per_suite(suite) -> [];
49
end_per_suite(Config) when is_list(Config) ->
38
50
stop_node(init_test),
56
68
%%-----------------------------------------------------------------
59
sync(Conf) when list(Conf) ->
71
sync(Conf) when is_list(Conf) ->
60
72
?line Dog = ?t:timetrap(?t:seconds(120)),
61
73
% Write a config file
62
74
Dir = ?config(priv_dir,Conf),