git.iko.soy/typeable/aeson
on master help sign in
Test formatRelativePath
c5ef70bAdam Bergmark
tests/UnitTests.hs+1−1
compare with master
unifiedsplit
@@ -267,7 +267,7 @@ formatPathExample =
267
267
268formatRelativePathExample :: Assertion
268formatRelativePathExample :: Assertion
269formatRelativePathExample =
269formatRelativePathExample =
270− let rhs = formatPath [Key "x", Index 0]
270+ let rhs = formatRelativePath [Key "x", Index 0]
271 lhs = ".x[0]"
271 lhs = ".x[0]"
272 in assertEqual "formatRelativePath example" lhs rhs
272 in assertEqual "formatRelativePath example" lhs rhs
273
273