X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Fshellcommands.pm;h=7a87bd3e014113ad98b7a405b4c3998c65408f93;hp=ccde72a6835cfb720f6af511f7627058141ab410;hb=ee1a01a4d001bf993b9cce54e59f119db20e49f0;hpb=e1be5ef574d0aa9fad3fda9828f3853d2444e9f7 diff --git a/FS/FS/part_export/shellcommands.pm b/FS/FS/part_export/shellcommands.pm index ccde72a68..7a87bd3e0 100644 --- a/FS/FS/part_export/shellcommands.pm +++ b/FS/FS/part_export/shellcommands.pm @@ -22,7 +22,7 @@ sub _export_command { my $command = $self->option($action); no strict 'refs'; ${$_} = $svc_acct->getfield($_) foreach $svc_acct->fields; - $self->shellcommands_queue( + $self->shellcommands_queue( $svc_acct->svcnum, $self->options('user')||'root'. "\@". $self->options('machine'), eval(qq("$command")) ); @@ -34,7 +34,7 @@ sub _export_replace { no strict 'refs'; ${"old_$_"} = $old->getfield($_) foreach $old->fields; ${"new_$_"} = $new->getfield($_) foreach $new->fields; - $self->shellcommands_queue( + $self->shellcommands_queue( $new->svcnum, $self->options('user')||'root'. "\@". $self->options('machine'), eval(qq("$command")) );