working textradius

diff --git a/FS/FS/part_export/textradius.pm b/FS/FS/part_export/textradius.pm
index 7480787..c96bcfc 100644 (file)
--- a/FS/FS/part_export/textradius.pm
+++ b/FS/FS/part_export/textradius.pm
@@ -43,7 +43,7 @@ sub textradius_queue {
     'job'    => "FS::part_export::textradius::textradius_$method",
   };
   $queue->insert(
     'job'    => "FS::part_export::textradius::textradius_$method",
   };
   $queue->insert(

-    $self->option('user'),
+    $self->option('user')||'root',

     $self->machine,
     $self->option('users'),
     @_,
     $self->machine,
     $self->option('users'),
     @_,


@@ -126,7 +126,8 @@ sub textradius_download {
   $rsync->exec( {
     src  => "$user\@$host:$users",
     dest => $dest,
   $rsync->exec( {
     src  => "$user\@$host:$users",
     dest => $dest,

-  } ) or die "error downloading $user\@$host:$users : ". $rsync->err;
+  } ) or die "error downloading $user\@$host:$users : ".
+             join(" / ", $rsync->err);

 
   $dest;
 }
 
   $dest;
 }


@@ -145,7 +146,8 @@ sub textradius_upload {
   $rsync->exec( {
     src  => "$dir/users",
     dest => "$user\@$host:$users",
   $rsync->exec( {
     src  => "$dir/users",
     dest => "$user\@$host:$users",

-  } ) or die "error uploading to $user\@$host:$users : ". $rsync->err;
+  } ) or die "error uploading to $user\@$host:$users : ".
+             join(" / ", $rsync->err);

 
   flock(LOCK,LOCK_UN);
   close LOCK;
 
   flock(LOCK,LOCK_UN);
   close LOCK;