patchfrom Thibaud


git-svn-id: https://geuz.org/svn/gmsh/trunk@16464 59c8cabf-10d6-4a28-b43f-3936b85956c4