William III Count of Henneberg-Schleusingen