We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent fc71e92 commit 27d36abCopy full SHA for 27d36ab
1 file changed
test/App/Fossa/VendoredDependencySpec.hs
@@ -45,12 +45,11 @@ spec = do
45
46
describe "safeSeparators" $ do
47
it "joins relative path components with underscores" $
48
- safeSeparators "build/base-files" `shouldBe` "build_base-files"
+ safeSeparators "foo/bar" `shouldBe` "foo_bar"
49
it "leaves bare filenames untouched" $
50
- safeSeparators "base-files" `shouldBe` "base-files"
+ safeSeparators "foo" `shouldBe` "foo"
51
it "drops the root component for absolute paths" $
52
- safeSeparators "/home/marcel/build/tmp/fossa_metadata/src/base-files"
53
- `shouldBe` "home_marcel_build_tmp_fossa_metadata_src_base-files"
+ safeSeparators "/foo/bar/baz" `shouldBe` "foo_bar_baz"
54
55
describe "skippedDepsDebugLog" $ do
56
it "should return SkippingUnsupportedMsg when skipping is not supported" $
0 commit comments