From: ivan <ivan>
Date: Fri, 24 Oct 2008 21:25:29 +0000 (+0000)
Subject: rlm_perl hook for prepaid voip radius, RT#4100
X-Git-Tag: root_of_webpay_support~288
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=5ac1caa13f07e0ef57d91969a9dcd11388d3816d

rlm_perl hook for prepaid voip radius, RT#4100
---

diff --git a/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm b/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm
index c52a97fb2..67ad9a15b 100644
--- a/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm
+++ b/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm
@@ -41,7 +41,7 @@ sub authorize {
   my $response = call_time( 'src' => $RAD_REQUEST{'Calling-Station-Id'},
                             'dst' => $RAD_REQUEST{'Called-Station-Id'},  );
 
-  if ( $response->{$error} ) {
+  if ( $response->{'error'} ) {
     $RAD_REPLY{'Access-Reject'} = $response->{'error'};
     return RLM_MODULE_REJECT;
   } else {