Remove /o flag from iterate_hash_list()

* /o in the -next and -last regexes causes the regex pattern to freeze with whatever prefix happens to be used on the first run of the routine. This is particularly pernicious in pre-fork where the daemon may be used dozens of times after the initial run that freezes the pattern. * Modified flags to match those of the regex counterparts in iterate_array_list().
interchange · Jul 6, 2014 · 2b7e29d · 2b7e29d
1 parent bb24125
commit 2b7e29d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/Vend/Interpolate.pm b/lib/Vend/Interpolate.pm
@@ -4511,9 +4511,9 @@ sub iterate_hash_list {
                     elsif($tmp) {
                         $return = 1;
                     }
-                    '' #xoge;
+                    '' #ixge;
 		$run =~ s#$B$QR{_next}$E$QR{'/_next'}#
-                    interpolate_html($1) != 0 ? next : '' #oge;
+                    interpolate_html($1) != 0 ? next : '' #ixge;
 		$run =~ s/<option\s*/<option SELECTED /i
 			if $opt_select and $opt_select->($code);