perl-ssl.patch 973 B

1234567891011121314151617181920212223242526272829303132333435363738
  1. Index: Crypt-SSLeay-0.58_01/Makefile.PL
  2. --- Crypt-SSLeay-0.58_01/Makefile.PL.orig 2010-09-08 21:05:00.000000000 +0200
  3. +++ Crypt-SSLeay-0.58_01/Makefile.PL 2010-12-19 20:36:45.000000000 +0100
  4. @@ -279,17 +279,7 @@
  5. }
  6. sub unix_ssl_dirs {
  7. - return qw(
  8. - /usr
  9. - /usr/local
  10. - /usr/local/ssl
  11. - /usr/local/openssl
  12. - /local
  13. - /local/openssl
  14. - /local/ssl
  15. - /opt/openssl
  16. - /opt/ssl
  17. - );
  18. + return qw(/usr);
  19. }
  20. sub print_ssl_dir_not_found {
  21. Index: IO-Socket-SSL-1.44/SSL.pm
  22. --- IO-Socket-SSL-1.44/SSL.pm.orig 2010-12-09 09:32:07.000000000 +0100
  23. +++ IO-Socket-SSL-1.44/SSL.pm 2010-12-19 20:36:20.000000000 +0100
  24. @@ -629,10 +629,7 @@
  25. sub read {
  26. my $self = shift;
  27. - return $self->generic_read(
  28. - $self->blocking ? \&Net::SSLeay::ssl_read_all : \&Net::SSLeay::read,
  29. - @_
  30. - );
  31. + return $self->generic_read(\&Net::SSLeay::read, @_);
  32. }
  33. # contrary to the behavior of read sysread can read partial data