[haskell] Redefine eldoc function to apply font lock
Bind C-x w to widen