--- rpl/src/gestion_fichiers.c	2010/01/26 15:22:44	1.1
+++ rpl/src/gestion_fichiers.c	2010/03/04 10:17:48	1.5
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.9
+  RPL/2 (R) version 4.0.12
   Copyright (C) 1989-2010 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -312,7 +312,7 @@ caracteristiques_fichier(struct_processu
 	(*ouverture) = d_faux;
 	(*existence) = d_faux;
 
-	if ((descripteur = open(nom, O_CREAT | O_EXCL)) == -1)
+	if ((descripteur = open(nom, O_CREAT | O_EXCL, S_IRUSR | S_IWUSR)) == -1)
 	{
 		if (errno == EEXIST)
 		{