| … | … | ||
|---|---|---|---|
| 7 | use Socket; | 7 | use Socket; |
| 8 | use AnyEvent::Socket; | 8 | use AnyEvent::Socket; |
| 9 | 9 | ||
| 10 | CONF BIND_ADDRESSES = [[undef, 13327]]; | 10 | CONF BIND_ADDRESSES = [[undef, 13327]]; |
| 11 | 11 | ||
| 12 | our $MAX_DETECT = 16; # how many bytes to raed to identify the protocol | 12 | our $MAX_DETECT = 32; # how many bytes to read to identify the protocol |
| 13 | 13 | ||
| 14 | our @LISTENERS; | 14 | our @LISTENERS; |
| 15 | 15 | ||
| 16 | sub flash_policy_server { | 16 | sub flash_policy_server { |
| 17 | my ($fh) = @_; | 17 | my ($fh) = @_; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |