diff options
-rw-r--r-- | FS/FS/queue.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/FS/FS/queue.pm b/FS/FS/queue.pm index 61cee0a..381e418 100644 --- a/FS/FS/queue.pm +++ b/FS/FS/queue.pm @@ -127,7 +127,12 @@ sub insert { local $FS::UID::AutoCommit = 0; my $dbh = dbh; - my %args = @args; + my %args = (); + { + no warnings "misc"; + %args = @args; + } + $self->custnum( $args{'custnum'} ) if $args{'custnum'}; my $error = $self->SUPER::insert; |