libnet-ssleay-perl (1.22-1) unstable; urgency=low

  * New upstream release.
  * Add patch from Simon Horman <horms@vergenet.net>,that fixes two
    outstanding memory leaks in SSLeay.pm,
  Closes: #169732

 -- Stephen Zander <gibreel@debian.org>  Tue, 25 Feb 2003 00:17:37 -0800

--- libnet-ssleay-perl-1.25.orig/SSLeay.pm
+++ libnet-ssleay-perl-1.25/SSLeay.pm
@@ -1879,6 +1879,18 @@
 }
 
 ###
+### Wrap load_error_strings so it is only called once
+### to avoid leaking like a sieve
+###
+
+my $load_error_strings_state = 0;
+sub load_error_strings_wrapper {
+	return if $load_error_strings_state == 1;
+	$load_error_strings_state = 1;
+	load_error_strings();
+}
+
+###
 ### Basic request - response primitive (don't use for https)
 ###
 
@@ -1892,7 +1904,7 @@
     ### Do SSL negotiation stuff
 	    
     warn "Creating SSL $ssl_version context...\n" if $trace>2;
-    load_error_strings();         # Some bloat, but I'm after ease of use
+    load_error_strings_wrapper(); # Some bloat, but I'm after ease of use
     SSLeay_add_ssl_algorithms();  # and debuggability.
     randomize();
     
@@ -2022,7 +2034,7 @@
     ### Do SSL negotiation stuff
 	    
     warn "Creating SSL $ssl_version context...\n" if $trace>2;
-    load_error_strings();         # Some bloat, but I'm after ease of use
+    load_error_strings_wrapper(); # Some bloat, but I'm after ease of use
     SSLeay_add_ssl_algorithms();  # and debuggability.
     randomize();