Include correct source lines in messages.pot

Currently, the pot file generated by hgettext claims that each string is at line 0. Here's a simple patch to fix that.

Language.Haskell.Exts.Annotated annotates each expression with its source location. So, we take the starting line of the string. All the _s added to the binding are for the other source locations, which we ignore.