[open-ils-commits] r12969 - trunk/Open-ILS/src/perlmods/OpenILS/Application (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2009-04-22 14:49:23 -0400 (Wed, 22 Apr 2009)
New Revision: 12969

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm
Log:
split wants a regex pattern to split on

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm	2009-04-22 18:34:41 UTC (rev 12968)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm	2009-04-22 18:49:23 UTC (rev 12969)
@@ -526,7 +526,7 @@
             if (my $group = $e->event->event_def->group_field) {
 
                 # split the grouping link steps
-                my @steps = split '.', $group;
+                my @steps = split /\./, $group;
 
                 # find the grouping object
                 my $node = $e->target;