     'prefix': 'let'
     'body': '''
       let
-      \t${1:name} = ${2:expression}\n\tin ${0:expression}
+      \t${1:name} = ${2:expression}
+      \tin ${0:expression}
       '''
   'newtype …':
     'prefix': 'new'

      module Main where

      main :: IO ()
      main = ${0:putStrLn "Hello World"}\n
      '''
  'Right Arrow':
    'prefix': '>'

'.source .haskell':
  'Pragma':
    'prefix': '{-#'
    'body': '{-# $1 #-'
