Shaver, John (Bath County)