[freeside-commits] freeside/FS/FS/part_export radiator.pm,1.4,1.5

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory wavetail:/tmp/cvs-serv27641

Modified Files:
	radiator.pm 
Log Message:
use crypt password for radiator export

Index: radiator.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/radiator.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- radiator.pm	28 Nov 2005 16:07:30 -0000	1.4
+++ radiator.pm	12 Dec 2005 21:39:35 -0000	1.5
@@ -68,7 +68,7 @@
   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 @@
   $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