feat: renderPackage

Co-authored-by: Roberto Abdelkader Martínez Pérez <[email protected]>
BBVA · Apr 29, 2020 · 0f1a0e8 · 0f1a0e8
1 parent 2373a14
commit 0f1a0e8
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/Text/DebianSecurityAnalyzer/Database.hs b/src/Text/DebianSecurityAnalyzer/Database.hs
@@ -6,4 +6,4 @@ renderVulnerability :: CVE -> String
 renderVulnerability CVE { name = n , description = d } = n ++ ",," ++ d
 
 renderPackage :: String -> CVE -> Maybe String
-renderPackage _ _ = undefined
+renderPackage _ _ = Nothing
diff --git a/test/Text/DebianSecurityAnalyzer/DatabaseSpec.hs b/test/Text/DebianSecurityAnalyzer/DatabaseSpec.hs
@@ -48,7 +48,7 @@ spec = do
                         }
           in splitOn "," (renderVulnerability cve) `shouldBe` [name cve, "", description cve]
     describe "renderPackage: CVE to debsecan's vulnerability format" $ do
-      it "should ignore unaffected packages" $ 
+      it "should ignore unaffected packages" $
         let cve = CVE { name = "foo"
                       , description = "bar"
                       , priority = Nothing