This commit is contained in:
Joey Hess 2013-04-15 17:42:30 -04:00
parent f44c917b22
commit 737ece771b
2 changed files with 2 additions and 1 deletions

View file

@ -268,7 +268,7 @@ expandExpressionSplice s lls = concat [before, spliced:padding, end]
-- function definition needs no preparation -- function definition needs no preparation
-- ie: foo = $(splice) -- ie: foo = $(splice)
| "=" `isSuffixOf` s' = s | "=" `isSuffixOf` s' = s
-- nor does lambda definition -- nor does lambda definition or case expression
| "->" `isSuffixOf` s' = s | "->" `isSuffixOf` s' = s
-- nor does a let .. in declaration -- nor does a let .. in declaration
| "in" `isSuffixOf` s' = s | "in" `isSuffixOf` s' = s

View file

@ -5,6 +5,7 @@
- -
- ** DO NOT COMMIT ** - ** DO NOT COMMIT **
-} -}
import qualified Data.Text
import qualified Data.Text.Lazy.Builder import qualified Data.Text.Lazy.Builder
import qualified Text.Shakespeare import qualified Text.Shakespeare
import qualified Text.Hamlet import qualified Text.Hamlet