Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
Projets publics
Ravada-Mirror
Commits
5ec56934
Commit
5ec56934
authored
Oct 14, 2021
by
Fernando Verdugo
Browse files
fix(backend): find a solution
I comment the function for better analysis issue #1615
parent
ddec30d6
Changes
1
Hide whitespace changes
Inline
Side-by-side
lib/Ravada/Domain/KVM.pm
View file @
5ec56934
...
...
@@ -1640,13 +1640,13 @@ sub _ip_agent($self) {
}
}
sub
_ip_arp
($self) {
my
@sys_virt_version
=
split
('
\.
',
$
Sys::Virt::
VERSION
);
return
undef
if
(
$sys_virt_version
[
0
]
<
5
);
my
@ip
;
eval
"
@ip
=
$self
->domain->get_interface_addresses(Sys::Virt::Domain::INTERFACE_ADDRESSES_SRC_ARP);
";
return
@ip
;
}
#
sub _ip_arp($self) {
#
my @sys_virt_version = split('\.', $Sys::Virt::VERSION);
#
return undef if ($sys_virt_version[0] < 5);
#
my @ip;
#
eval " @ip = $self->domain->get_interface_addresses(Sys::Virt::Domain::INTERFACE_ADDRESSES_SRC_ARP); ";
#
return @ip;
#
}
sub
ip
($self) {
my
@ip
;
...
...
@@ -1654,7 +1654,7 @@ sub ip($self) {
warn
$@
if
$@
;
return
$ip
[
0
]
->
{
addrs
}
->
[
0
]
->
{
addr
}
if
$ip
[
0
];
@ip
=
$self
->
_ip_arp
();
#
@ip = $self->_ip_arp();
return
$ip
[
0
]
->
{
addrs
}
->
[
0
]
->
{
addr
}
if
$ip
[
0
];
return
$self
->
_ip_agent
();
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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