clean up lookupSymbol.

This commit is contained in:
Kazu Yamamoto
2014-07-18 15:13:30 +09:00
parent 6d42354a5b
commit e1d9c3b881
3 changed files with 10 additions and 10 deletions

View File

@@ -13,4 +13,4 @@ spec = do
describe "db <- loadSymbolDb" $ do
it "lookupSymbol' db \"head\" contains at least `Data.List'" $ do
db <- loadSymbolDb
lookupSymbol' "head" db `shouldContain` ["Data.List"]
lookupSym "head" db `shouldContain` ["Data.List"]