String.Coerce: coerceToString: m refactor

Anton-Latukha · Anton-Latukha · commit 2f2609d1f22f · 2021-10-29T11:33:37.000+03:00
diff --git a/src/Nix/String/Coerce.hs b/src/Nix/String/Coerce.hs
@@ -78,7 +78,7 @@ coerceToString call ctsm clevel = go
           NVStr ns -> pure ns
           NVPath p ->
             bool
-              (castToNixString . toText)
+              (castToNixString . fromString . coerce)
               (fmap storePathToNixString . addPath)
               (ctsm == CopyToStore)
               p

Original file line number	Diff line number	Diff line change
`@@ -78,7 +78,7 @@ coerceToString call ctsm clevel = go`
`78`	`78`	`NVStr ns -> pure ns`
`79`	`79`	`NVPath p ->`
`80`	`80`	`bool`
`81`		`- (castToNixString . toText)`
	`81`	`+ (castToNixString . fromString . coerce)`
`82`	`82`	`(fmap storePathToNixString . addPath)`
`83`	`83`	`(ctsm == CopyToStore)`
`84`	`84`	`p`