Add helper function PRI(), update blocklist.php for PHP8.

git-svn-id: svn://pmwiki.org/pmwiki/trunk@4763 524c5546-5005-0410-9a3e-e25e191bd360

1 files changed, 5 insertions, 0 deletions

diff --git a/pmwiki.php b/pmwiki.php
index 1b7e6b24..e71cf240 100644
--- a/pmwiki.php
+++ b/pmwiki.php
@@ -846,6 +846,11 @@ function PRCB($pat, $repl, $subj, $vars=null, $limit=-1, &$count=null, $flags=0)
     return preg_replace_callback($pat, $repl, $subj, $limit, $count, $flags);
   return preg_replace_callback($pat, $repl, $subj, $limit, $count);
 }
+function PRI($glue, $array) { ## Recursive implode
+  $out = array();
+  foreach($array as $v) $out[] = is_array($v)? PRI($glue, $v) : $v;
+  return implode($glue, $out);
+}
 
 ##  This is a replacement for json_encode+PHSC, but only for arrays that
 ##  are used by the PmWiki core. It may or may not work in other cases.