Function: fixup-whitespace

Fixup white space between objects around point.
Leave one space or none, according to the context.