Commit 52fd1a119e45a1ba86c8e5fb72d9f87208d98e3d - libcapture-tiny-perl

reorder proxy closing for 5.6 compatibility David Golden 15 years ago

1 changed file(s) with 2 addition(s) and 1 deletion(s). Raw diff Collapse all Expand all

-1

lib/Capture/Tiny.pm less more

113	113	$proxy_count{$p}--;
114	114	_debug( "# unproxied " . uc($p) . " ($proxy_count{$p} left)\n" );
115	115	if ( ! $proxy_count{$p} ) {
116		_close delete $dup{$p};
117	116	_close $proxies{$p};
	117	_close $dup{$p} unless $] < 5.008; # 5.6 will have already closed this as dup
	118	delete $dup{$p};
118	119	}
119	120	}
120	121	}