workaround for https://rt.cpan.org/Ticket/Display.html?id=93244

2014-02-22 08:41:32 +00:00
parent 937661dd31
commit c1799a8a05
2 changed files with 3 additions and 2 deletions
--- a/Netdisco/lib/App/Netdisco/DB/ResultSet/Device.pm
+++ b/Netdisco/lib/App/Netdisco/DB/ResultSet/Device.pm
@@ -372,8 +372,8 @@ sub carrying_vlan {
      if ref {} ne ref $cond or !exists $cond->{vlan};

    $cond->{'-and'} ||= [];
-    push @{$cond->{'-and'}}, 'vlans.vlan' => $cond->{vlan};
-    push @{$cond->{'-and'}}, 'port_vlans.vlan' => delete $cond->{vlan};
+    push @{$cond->{'-and'}}, { 'vlans.vlan' => $cond->{vlan} };
+    push @{$cond->{'-and'}}, { 'port_vlans.vlan' => delete $cond->{vlan} };

    return $rs
      ->search_rs($cond,