Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
Projets publics
Ravada-Mirror
Commits
cebc2d60
Commit
cebc2d60
authored
Jul 05, 2019
by
Francesc Guasch
Browse files
wip(test): slightly improved tests for some cases
issue #1104
parent
9592d76d
Changes
2
Hide whitespace changes
Inline
Side-by-side
t/lib/Test/Ravada.pm
View file @
cebc2d60
...
...
@@ -979,6 +979,12 @@ sub start_node($node) {
is
(
$connect
,
1
,"
[
"
.
$node
->
type
.
"
]
"
.
$node
->
name
.
"
Expecting connection
")
or
exit
;
for
(
1
..
60
)
{
$domain
=
_domain_node
(
$node
);
last
if
$domain
->
ip
;
sleep
1
;
diag
("
Waiting for connection to node
"
.
$node
->
name
.
"
$_
")
if
!
(
$_
%
5
);
}
eval
{
$node
->
run_command
("
hwclock
","
--hctosys
")
};
is
(
$@
,'',"
Expecting no error setting clock on
"
.
$node
->
name
.
"
"
.
(
$@
or
''));
...
...
t/vm/92_ports.t
View file @
cebc2d60
...
...
@@ -46,10 +46,10 @@ sub test_one_port($vm) {
is
(
$@
,'',"
[
"
.
$vm
->
type
.
"
] export port
$internal_port
");
my
$port_info_no
=
$domain
->
exposed_port
(
456
);
is
(
!
$port_info_no
);
is
(
$port_info_no
,
undef
);
$port_info_no
=
$domain
->
exposed_port
('
no
');
is
(
!
$port_info_no
);
is
(
$port_info_no
,
undef
);
my
$port_info
=
$domain
->
exposed_port
(
$name_port
);
ok
(
$port_info
)
&&
do
{
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment