[open-ils-commits] r14748 - branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Trigger (miker)
svn at svn.open-ils.org
svn at svn.open-ils.org
Tue Nov 3 14:47:27 EST 2009
Author: miker
Date: 2009-11-03 14:47:23 -0500 (Tue, 03 Nov 2009)
New Revision: 14748
Modified:
branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm
Log:
backporting r14747: use the individual opcodes instead of the :load tag, which is not supported until opcodes in perl 5.10
Modified: branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm
===================================================================
--- branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm 2009-11-03 19:46:31 UTC (rev 14747)
+++ branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm 2009-11-03 19:47:23 UTC (rev 14748)
@@ -361,7 +361,7 @@
try {
my $compartment = new Safe;
- $compartment->permit(':default',':load');
+ $compartment->permit(':default','require','dofile','caller');
$compartment->share('$current_environment');
$self->environment->{EventProcessor} = $self;
More information about the open-ils-commits
mailing list