Do not attempt to merge import listings, use the latest one
commite547fdd13262514b1b8131b12f3fd15cf685ff0f
authorEvan Czaplicki <info@elm-lang.org>
dateMon 10 Nov 2014, 23:54 (12 years ago)
parentfdcaaed
src/Transform/AddDefaultImports.hs+1−6
@@ -84,9 +84,4 @@ addImport (name, method) importDict =
8484 Just (qualifier : qualifiers, listing)
8585
8686 Module.Open newListing ->
87− Just (qualifiers, mergeListings newListing listing)
88−
89− mergeListings (Var.Listing explicits1 open1) (Var.Listing explicits2 open2) =
90− Var.Listing
91− (Set.toList (Set.fromList (explicits1 ++ explicits2)))
92− (open1 || open2)
87+ Just (qualifiers, newListing)