1 package OpenILS::Application::Trigger::Reactor;
2 use strict; use warnings;
5 use DateTime::Format::ISO8601;
6 use OpenSRF::Utils qw/:datetime/;
7 use OpenSRF::Utils::Logger qw(:logger);
8 use OpenILS::Application::AppUtils;
10 sub fourty_two { return 42 }
11 sub NOOP_True { return 1 }
12 sub NOOP_False { return 0 }
15 # processes templates. Returns template output on success, undef on error
19 return '' unless $env->{template};
22 my $tt = Template->new;
24 $env->{format_date} = \&format_date;
25 $env->{escape_xml} = \&escape_xml;
26 $env->{user_locale} = \&user_locale;
28 $tt->process(\$env->{template}, $env, \$output) or
29 $logger->error("Error processing Trigger template: " . $tt->error);
34 # turns a date into something TT can understand
37 $date = DateTime::Format::ISO8601->new->parse_datetime(clense_ISO8601($date));
39 "%0.2d:%0.2d:%0.2d %0.2d-%0.2d-%0.4d",
51 $str =~ s/&/&/sog;
60 return OpenILS::Application::AppUtils->get_user_locale($user_id);