1c1 < package POE::Wheel::TProxySocketFactory; --- > package POE::Wheel::SocketFactory; 6c6 < $VERSION = '0.901'; # NOTE - Should be #.### (three decimal places) --- > $VERSION = '1.312'; # NOTE - Should be #.### (three decimal places) 46,50d45 < # Define a couple of constants not in Socket.pm < # Note that this may be invalid outside Linux < sub SOL_IP () { 0 } < sub IP_TRANSPARENT () { 19 } < 680,689d674 < # charlesboyo: Make the socket transparent by setting the IP_TRANSPARENT socket option < unless (setsockopt($socket_handle, SOL_IP, IP_TRANSPARENT, 1)) { < $poe_kernel->yield( < $event_failure, < 'set_ip_transparent', $!+0, $!, $self->[MY_UNIQUE_ID] < ); < return $self; < } < DEBUG && warn "set_ip_transparent"; <