--- rpl/src/interface_tex.c	2011/07/22 07:38:41	1.30
+++ rpl/src/interface_tex.c	2011/11/28 21:42:04	1.35
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.1
+  RPL/2 (R) version 4.1.5
   Copyright (C) 1989-2011 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -2351,15 +2351,8 @@ impression_tex(struct_processus *s_etat_
 			return;
 		}
 
-		if (controle(s_etat_processus, executable_candidat, "md5",
-				rpliconv_md5) != d_vrai)
-		{
-			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
-			return;
-		}
-
-		if (controle(s_etat_processus, executable_candidat, "sha1",
-				rpliconv_sha1) != d_vrai)
+		if (controle_integrite(s_etat_processus, executable_candidat,
+				"rpliconv") != d_vrai)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
 			return;
@@ -2374,15 +2367,8 @@ impression_tex(struct_processus *s_etat_
 			return;
 		}
 
-		if (controle(s_etat_processus, executable_candidat, "md5",
-				rplfile_md5) != d_vrai)
-		{
-			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
-			return;
-		}
-
-		if (controle(s_etat_processus, executable_candidat, "sha1",
-				rplfile_sha1) != d_vrai)
+		if (controle_integrite(s_etat_processus, executable_candidat,
+				"rplfile") != d_vrai)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
 			return;
@@ -2414,15 +2400,8 @@ impression_tex(struct_processus *s_etat_
 			return;
 		}
 
-		if (controle(s_etat_processus, executable_candidat, "md5",
-				rpliconv_md5) != d_vrai)
-		{
-			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
-			return;
-		}
-
-		if (controle(s_etat_processus, executable_candidat, "sha1",
-				rpliconv_sha1) != d_vrai)
+		if (controle_integrite(s_etat_processus, executable_candidat,
+				"rpliconv") != d_vrai)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
 			return;
@@ -2437,15 +2416,8 @@ impression_tex(struct_processus *s_etat_
 			return;
 		}
 
-		if (controle(s_etat_processus, executable_candidat, "md5",
-				rplfile_md5) != d_vrai)
-		{
-			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
-			return;
-		}
-
-		if (controle(s_etat_processus, executable_candidat, "sha1",
-				rplfile_sha1) != d_vrai)
+		if (controle_integrite(s_etat_processus, executable_candidat,
+				"rplfile") != d_vrai)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_somme_controle;
 			return;