diff --git a/compiler/src/Generate/Html.hs b/compiler/src/Generate/Html.hs index e41ee164..b572d050 100644 --- a/compiler/src/Generate/Html.hs +++ b/compiler/src/Generate/Html.hs @@ -17,9 +17,50 @@ import qualified Lamdera.UiSourceMap -- SANDWICH - +-- @LAMDERA root :: FilePath parameter added. sandwich :: FilePath -> Name.Name -> B.Builder -> B.Builder sandwich root moduleName javascript = + Lamdera.alternativeImplementationWhen Lamdera.isLamdera_ (sandwich_ root moduleName javascript) $ + let name = Name.toBuilder moduleName in + [r| + +
+ +