I recently launched http://geohangout.com. The entire backend service is written in Haskell (Yesod).