Bien tout effacer à la destruction d'une base, et sans émettre de faux...

Bien tout effacer à la destruction d'une base, et sans émettre de faux messages d'erreurs dans le Log.

ecrire/base/delete_all.php

@@ -10,25 +10,29 @@
  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
 \***************************************************************************/
 
-if (!defined("_ECRIRE_INC_VERSION")) return; // securiser
+if (!defined("_ECRIRE_INC_VERSION")) return;
 
 // http://doc.spip.org/@base_delete_all_dist
 function base_delete_all_dist($titre)
 {
 	$delete = _request('delete');
+	$res = array();
 	if (is_array($delete)) {
-		$res = array();
 		foreach ($delete as $table) {
-		  if (spip_query("DROP TABLE $table"))
-		    $res[] = $table;
+			if (spip_query("DROP TABLE $table"))
+				$res[] = $table;
+			else spip_log("DROP TABLE $table inoperant.");
 		}
 	}
 
 	// un pipeline pour detruire les tables installees par les plugins
 	pipeline('delete_tables', '');
 
-	spip_unlink(_ACCESS_FILE_NAME);
 	spip_unlink(_FILE_CONNECT);
+	spip_unlink(_FILE_CHMOD);
+	spip_unlink(_FILE_META);
+	spip_unlink(_ACCESS_FILE_NAME);
+	spip_unlink(_CACHE_RUBRIQUES);
 	$d = count($delete);
 	$r = count($res);
 	spip_log("Tables detruites: $r sur $d: " . join(', ',$res));

ecrire/inc/admin.php

@@ -34,7 +34,6 @@ function inc_admin_dist($script, $titre, $comment='', $retour='')
 	$base = charger_fonction($script, 'base');
 	$base($titre,$reprise);
 	fin_admin($script);
-	spip_log("efface les meta admin et $script " . ($retour ? $retour : ''));
 	if ($retour) redirige_par_entete($retour);
 }
 
@@ -155,10 +154,12 @@ function debut_admin($script, $action='', $corps='') {
 // http://doc.spip.org/@fin_admin
 function fin_admin($action) {
 	$signal = dir_admin() . fichier_admin($action);
-	@rmdir($signal); // par precaution
 	spip_unlink($signal);
-	effacer_meta($action);
-	effacer_meta('admin');
+	if ($action != 'delete_all') {
+		effacer_meta($action);
+		effacer_meta('admin');
+		spip_log("efface les meta admin et $action ");
+	}
 }
 
 // http://doc.spip.org/@copy_request