diff --git a/pario/eaf/eaf.c b/pario/eaf/eaf.c
index f1afe2d00..eb8aa33d1 100644
--- a/pario/eaf/eaf.c
+++ b/pario/eaf/eaf.c
@@ -479,6 +479,9 @@ int EAF_Delete(const char *fname)
 	 return EAF_ERR_UNLINK;
        }
        else
+	 if (file[j].fname != NULL) {
+	   free(file[j].fname);
+	 };
 	 file[j].fname= NULL;
            return EAF_OK;
        }else{