(RADIATOR) Handler.pm.patch for 2.15 to make Pre/PostAuthHook work

[Lars Marowsky-Bree]

Bug is obvious from the patch I think. I didn't check any of the other hooks
though.

Sincerely,
    Lars Marowsky-Br�e
        
--
Lars Marowsky-Br�e
Network Management

teuto.net Netzdienste GmbH

--- Handler.pm~ Tue Feb 15 08:09:41 2000
+++ Handler.pm  Mon Feb 28 16:23:22 2000
@@ -495,7 +495,7 @@
     {
        # We use an eval so an error in the hook wont 
        # kill us.
-       eval{ &{$self->{PreAuthHook}}(\$p, \$rp); };
+       eval{ &{$self->{PreAuthHook}}($p, $rp); };
        &main::log($main::LOG_ERR, 
                   "Error in PreAuthHook(): $@")
            if $@;
@@ -545,7 +545,7 @@
     {
        # We use an eval so an error in the hook wont 
        # kill us.
-       eval{ &{$self->{PostAuthHook}}(\$p, \$rp, \$handled); };
+       eval{ &{$self->{PostAuthHook}}($p, $rp, $handled); };
        &main::log($main::LOG_ERR, "Error in PostAuthHook(): $@")
            if $@;
     }