/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
- * Copyright (c) 2001-2017 *
+ * Copyright (c) 2001-2019 *
* Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
* *
* Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
$bad_dirs = array();
$absent_dirs = array();
- while (list(, $my_dir) = each($GLOBALS['test_dirs'])) {
+ foreach ($GLOBALS['test_dirs'] as $i => $my_dir) {
$test = test_ecrire($my_dir);
if (!$test) {
$m = preg_replace(',^' . _DIR_RACINE . ',', '', $my_dir);