writing a quick query-replace-at-point utility