POST -> '.$url);
my $res = $ua->request($req);
if($res->is_success) {
my $data = decode_json_utf8( $res->decoded_content );
my $success = $data->{success};
$success = $$success if (
is_nullable => 1 },
"auth_key",
{ data_type => "varchar", is_nullable => 0, size => 128 },
"json_data",
{ data_type => "text", is_nullable => 1 },
);
__PACKAGE__->set_primary_key("id");
__PACK
my $json = encode_json_ascii($data) or die "unknown error serializing to json";
$self->json_data($json)
}
sub _deserialize_action_data {
my $self = shift;
my $json = $self->json_data or r
eturn {};
my $data = decode_json_ascii($json) or die "unknown error occured deserializing json_data";
(ref($data)||'') eq 'HASH' or die "Bad action data - did not deserialize to a HashRef";
datetime NOT NULL,
[user_id] INTEGER,
[auth_key] varchar(128) UNIQUE NOT NULL,
[json_data] text,
FOREIGN KEY ([type]) REFERENCES [preauth_action_type] ([name]) ON DELETE
=> 'RA.ux.App.someJsFunc',
#profiles => [],
},
json_data => {
header => 'JSON Data',
width => 300,
hidden => 1,
profiles