From 4ecf2e50a0c128c07048385701a0725dec97be75 Mon Sep 17 00:00:00 2001
From: Jeroen Engels <jfm.engels@gmail.com>
Date: Fri, 12 Mar 2021 18:13:45 +0100
Subject: [PATCH] Clean up code from DependencyCreator

---
 create-dependency/src/DependencyCreator.elm | 18 ------------------
 1 file changed, 18 deletions(-)

diff --git a/create-dependency/src/DependencyCreator.elm b/create-dependency/src/DependencyCreator.elm
index 79230930..46a2ea95 100644
--- a/create-dependency/src/DependencyCreator.elm
+++ b/create-dependency/src/DependencyCreator.elm
@@ -8,10 +8,7 @@ import Elm.Package
 import Elm.Project
 import Elm.Type
 import Elm.Version
-import Html.Attributes exposing (form, type_)
 import Json.Decode as Decode
-import Review.Project exposing (elmJson)
-import Review.Project.Dependency as Dependency exposing (Dependency)
 import String
 
 
@@ -105,16 +102,6 @@ formatType type_ =
             "Elm.Type.Type " ++ stringify name ++ " " ++ listOfThings formatType list
 
         Elm.Type.Record fields maybeVar ->
-            let
-                var : String
-                var =
-                    case maybeVar of
-                        Just var_ ->
-                            var_ ++ " | "
-
-                        Nothing ->
-                            ""
-            in
             "Elm.Type.Record " ++ listOfThings (\( field, subType ) -> "( " ++ stringify field ++ ", " ++ formatType subType ++ " )") fields ++ " " ++ Debug.toString maybeVar
 
         Elm.Type.Lambda input output ->
@@ -274,9 +261,4 @@ unsafeConstraint constraint =
     )
 
 
-formatPackageName : Elm.Package.Name -> String
-formatPackageName packageName =
-    "Elm.Package.fromString " ++ stringify (Elm.Package.toString packageName) ++ " |> Maybe.withDefault Elm.Package.one"
-
-
 port sendToJs : ( String, String ) -> Cmd msg