#6 Error in SSL code

[Javier Fernandez-Sanguino Peña]

There is an error in the SSL code (this might or might
not be related to the other "SSL connection" bug
reported) which prevents SSL proxy from working. It
seems that in the migration to the new library function
stuff this was overlooked (and not fixed).

The problem shows up in httpush-0.9b11 when doing an
SSL connection:
Undefined subroutine &main::Debug called at httpush.pl
line 1124, <STDIN> line 4.
(1408)# child 1414 (slave) terminated status 65280

Here's the patch that fixes it:
(the diff output will be probably be mangled due to the
web form)
$ diff -u httpush.pl httpush.pl.fixed
--- httpush.pl Sun Oct 28 23:02:49 2001
+++ httpush.pl.fixed Mon Sep 16 16:55:00 2002
@@ -1121,7 +1121,7 @@

Net::SSLeay::accept($CURRENT{'ssl'}) and
die_if_ssl_error('ssl accept');

- Debug ("Fake SSL session established
(".Net::SSLeay::get_cipher($CURRENT{'ssl'}).")");
+ lib::debug("Fake SSL session established
(".Net::SSLeay::get_cipher($CURRENT{'ssl'}).")");

my $x=GetSSLRequest($r);