Continue removing LDTs
This commit is contained in:
@@ -54,7 +54,7 @@ crSetRoots cid w = fromMaybe w $ do
|
||||
dropMissing
|
||||
preserveMissing
|
||||
(zipWithMatched f)
|
||||
(invRootTrees inv)
|
||||
(invIMDT inv)
|
||||
where
|
||||
f _ _ = itLocation . ilIsRoot .~ True
|
||||
|
||||
|
||||
Reference in New Issue
Block a user