From 737ece771b7c8eb7339489f5ec36a6c5907ab81e Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 15 Apr 2013 17:42:30 -0400 Subject: [PATCH] update --- Build/EvilSplicer.hs | 2 +- standalone/android/evilsplicer-headers.hs | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/Build/EvilSplicer.hs b/Build/EvilSplicer.hs index d70c0a220b..babbb8f720 100644 --- a/Build/EvilSplicer.hs +++ b/Build/EvilSplicer.hs @@ -268,7 +268,7 @@ expandExpressionSplice s lls = concat [before, spliced:padding, end] -- function definition needs no preparation -- ie: foo = $(splice) | "=" `isSuffixOf` s' = s - -- nor does lambda definition + -- nor does lambda definition or case expression | "->" `isSuffixOf` s' = s -- nor does a let .. in declaration | "in" `isSuffixOf` s' = s diff --git a/standalone/android/evilsplicer-headers.hs b/standalone/android/evilsplicer-headers.hs index bdcb6383c5..16f98216b5 100644 --- a/standalone/android/evilsplicer-headers.hs +++ b/standalone/android/evilsplicer-headers.hs @@ -5,6 +5,7 @@ - - ** DO NOT COMMIT ** -} +import qualified Data.Text import qualified Data.Text.Lazy.Builder import qualified Text.Shakespeare import qualified Text.Hamlet