diff --git a/lib/Simba/CA.pm b/lib/Simba/CA.pm index 4a99828..9546367 100644 --- a/lib/Simba/CA.pm +++ b/lib/Simba/CA.pm @@ -685,7 +685,7 @@ sub linkdup { my $dev = defined $st ? $st->dev : "";; next unless $dev eq $my_dev; last if $self->{sessions_on_same_device} && @{ $self->{sessions_on_same_device} } > 30; - push @{ $self->{sessions_on_same_device} }, $r; + push @{ $self->{sessions_on_same_device} }, $r->{id}; # We only use the id } }