Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[delivers #15284861] Explicitly tear down Z39.50 connections

  • Loading branch information...
commit abe2d104940090f674ff09eeab8bb0291da4ef51 1 parent 4c59158
@ctfliblime ctfliblime authored
Showing with 7 additions and 0 deletions.
  1. +7 −0 C4/Context.pm
View
7 C4/Context.pm
@@ -339,6 +339,13 @@ sub new {
return $self;
}
+sub DESTROY {
+ my $self = shift;
+ for (values ($self->{Zconn} // {})) {
+ $_->destroy();
+ }
+}
+
sub getcache {
my ($self, $name, $args) = @_;
$context->{caches}{$name} //= CHI->new(%{$args});
Please sign in to comment.
Something went wrong with that request. Please try again.