Improvement for telephony: just-in-time event revalidation
[Evergreen.git] / Open-ILS / src / perlmods / lib / OpenILS / Application / JustInTime.pm
1 package OpenILS::Application::JustInTime;
2
3 use strict;
4 use warnings;
5
6 use OpenILS::Application;
7 use base qw/OpenILS::Application/;
8 use OpenILS::Application::AppUtils;
9 my $U = "OpenILS::Application::AppUtils";
10
11 sub revalidate_events {
12     my ($self, $conn, $event_id_list) = @_;
13
14     return $U->simplereq(
15         "open-ils.trigger",
16         "open-ils.trigger.event_group.revalidate.test",
17         $event_id_list
18     );
19 }
20
21 __PACKAGE__->register_method(
22     method   => "revalidate_events",
23     api_name => "open-ils.justintime.events.revalidate",
24     argc     => 1,
25     signature=> {
26         params => [
27             {type => "array", desc => "list of action_trigger.event IDs"},
28         ],
29         return => { desc => "A list of equal length as the input list telling us whether events validated" }
30     }
31 );
32
33 1;