From: ivan <ivan>
Date: Mon, 12 Dec 2005 21:39:35 +0000 (+0000)
Subject: use crypt password for radiator export
X-Git-Tag: BEFORE_FINAL_MASONIZE~258
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=b8ba3708111342732addb80c21e0f05838a53337

use crypt password for radiator export
---

diff --git a/FS/FS/part_export/radiator.pm b/FS/FS/part_export/radiator.pm
index 7fa948593..11ce3e793 100644
--- a/FS/FS/part_export/radiator.pm
+++ b/FS/FS/part_export/radiator.pm
@@ -68,7 +68,7 @@ sub _radiator_hash {
   my( $self, $svc_acct ) = @_;
   my %hash = (
     'username'  => $self->export_username($svc_acct),
-    'pass_word' => $svc_acct->_password,
+    'pass_word' => $svc_acct->crypt_password,
     'fullname'  => $svc_acct->finger,
     map { my $method = "radius_$_"; $_ => $svc_acct->$method(); }
         qw( framed_filter_id framed_mtu framed_netmask framed_protocol
@@ -82,7 +82,7 @@ sub _radiator_hash {
   $hash{'servicename'} = ( $svc_acct->radius_groups )[0];
 
   my $cust_pkg = $svc_acct->cust_svc->cust_pkg;
-  $hash{validto} = $cust_pkg->bill
+  $hash{'validto'} = $cust_pkg->bill
     if $cust_pkg && $cust_pkg->part_pkg->is_prepaid && $cust_pkg->bill;
 
   #some other random stuff, should probably be attributes or virtual fields