summaryrefslogtreecommitdiff
path: root/FS/FS/queue_arg.pm
diff options
context:
space:
mode:
authorjeff <jeff>2009-08-01 19:16:47 +0000
committerjeff <jeff>2009-08-01 19:16:47 +0000
commit9f64bfef652922b7b546a12290805710acbeed08 (patch)
tree00bfda66e9a8bf6ed30420775e712b72f9135c49 /FS/FS/queue_arg.pm
parent7f43bf155bc79e3c9bd5d88e53117595963c301e (diff)
support broader array of queue args #5855, fallout from #5495
Diffstat (limited to 'FS/FS/queue_arg.pm')
-rw-r--r--FS/FS/queue_arg.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/FS/FS/queue_arg.pm b/FS/FS/queue_arg.pm
index c96ff12..8e9a10d 100644
--- a/FS/FS/queue_arg.pm
+++ b/FS/FS/queue_arg.pm
@@ -36,6 +36,8 @@ FS::Record. The following fields are currently supported:
=item jobnum - see L<FS::queue>
+=item frozen - argument is frozen with Storable
+
=item arg - argument
=back
@@ -96,6 +98,7 @@ sub check {
my $error =
$self->ut_numbern('argnum')
|| $self->ut_numbern('jobnum')
+ || $self->ut_enum('frozen', [ '', 'Y' ])
|| $self->ut_anything('arg')
;
return $error if $error;