selectWordAroundCaret