ontinueAfter => $continueAfter,
};
}
# takes an ACE (singular version of ACL) and produces a JSON-serializable
# dictionary for transmitting over the wire
sub SerializeACE {
my $self = shift;
}
}
return $record;
}
# takes a user, group, ticket, queue, etc and produces a JSON-serializable
# dictionary
sub SerializeRecord {
my $self = shift;
my $record = shift;
self->URLForRecord($record),
disabled => $self->DisabledForRecord($record) ? JSON::true : JSON::false,
primary_record => $self->SerializeRecord($primary_record),
};
re