[interchange] Remove /o flag from iterate_hash_list()

Mark Johnson interchange-cvs at icdevgroup.org
Sun Jul 6 19:25:11 UTC 2014


commit 2b7e29de7cf8bb7ee467b614617e56bd75b41c13
Author: Mark Johnson <mark at endpoint.com>
Date:   Sun Jul 6 15:21:05 2014 -0400

    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().

 lib/Vend/Interpolate.pm |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/lib/Vend/Interpolate.pm b/lib/Vend/Interpolate.pm
index dcd5234..7ed57e2 100644
--- 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);	
 



More information about the interchange-cvs mailing list