X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Faradial.pm;h=1963e95f6db1f7815c85ece4007d5520c91ebb8c;hb=2e2c96e93a676eeca5bfa621ffc51570896cf450;hp=afb17a69977931c0437bae6da33d9f23ed12f293;hpb=e0deb48e8e53b5c24896a8f136e0a92d0c48b55a;p=freeside.git

diff --git a/FS/FS/part_export/aradial.pm b/FS/FS/part_export/aradial.pm
index afb17a699..1963e95f6 100644
--- a/FS/FS/part_export/aradial.pm
+++ b/FS/FS/part_export/aradial.pm
@@ -63,6 +63,7 @@ sub export_replace {
   $self->request_user_edit(
     'Page'    => 'UserEdit',
     'Modify'  => 1,
+    'UserID'  => $old->username,
     $self->svc_acct_params($new),
     UserLockout => $UserLockout,
   );
@@ -90,7 +91,7 @@ sub export_delete {
   my ($self, $svc) = @_;
   $self->request_user_edit(
     'ConfirmDelete' => 1,
-    ('$Delete$' . $svc->username) => 1,
+    ('$Checked$' . $svc->username) => 1,
   );
 }