--- rpl/src/rpl.c	2010/03/04 17:42:47	1.11
+++ rpl/src/rpl.c	2010/03/06 18:29:07	1.12
@@ -3190,7 +3190,17 @@ rplinit(int argc, char *argv[], unsigned
 						fclose((*((struct_descripteur_fichier *)
 								(*((struct_liste_chainee *)
 								l_element_courant)).donnee))
-								.descripteur);
+								.descripteur_c);
+
+						if ((*((struct_descripteur_fichier *)
+								(*((struct_liste_chainee *)
+								l_element_courant)).donnee)).type != 'C')
+						{
+							sqlite3_close((*((struct_descripteur_fichier *)
+									(*((struct_liste_chainee *)
+									l_element_courant)).donnee))
+									.descripteur_sqlite);
+						}
 
 						if ((*((struct_descripteur_fichier *)
 								(*((struct_liste_chainee *)