Shorter, William (Northampton County)