diff --git a/src/OpenApi/Config.elm b/src/OpenApi/Config.elm
index 19f0ce2..76b58b3 100644
--- a/src/OpenApi/Config.elm
+++ b/src/OpenApi/Config.elm
@@ -156,7 +156,7 @@ effectTypeToPackage effectType =
             Common.ElmHttp
 
         DillonkearnsElmPagesTaskRecord ->
-            Common.ElmHttp
+            Common.DillonkearnsElmPages
 
         DillonkearnsElmPagesTask ->
             Common.DillonkearnsElmPages
diff --git a/src/OpenApi/Generate.elm b/src/OpenApi/Generate.elm
index 7b17928..68931c4 100644
--- a/src/OpenApi/Generate.elm
+++ b/src/OpenApi/Generate.elm
@@ -1159,7 +1159,7 @@ dillonkearnsElmPagesBackendTask ({ toMsg, method, functionName } as operationUti
                             , ( "timeoutInMs", Elm.Annotation.maybe Elm.Annotation.int )
                             ]
                         )
-                        (Gen.BackendTask.Http.annotation_.expect (Elm.Annotation.var "a"))
+                        (Gen.BackendTask.Http.annotation_.expect successAnnotation)
                     )
             , specificExpect = specificExpect
             }
@@ -1175,7 +1175,7 @@ dillonkearnsElmPagesBackendTask ({ toMsg, method, functionName } as operationUti
           )
         , ( OpenApi.Config.DillonkearnsElmPagesTaskRecord
           , \{ taskArg, recordAnnotation, specificExpect } ->
-                ( functionName
+                ( functionName ++ "Record"
                 , Elm.fn
                     (Elm.Arg.var "config")
                     (\config -> Elm.tuple (taskArg config) (specificExpect <| toMsg config))