hoogle 5.0.17.13 → 5.0.17.14
raw patch · 5 files changed
+15/−14 lines, 5 filesdep ~haskell-src-extsPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: haskell-src-exts
API changes (from Hackage documentation)
Files
- CHANGES.txt +3/−0
- LICENSE +1/−1
- hoogle.cabal +3/−3
- html/index.html +1/−1
- src/Action/Server.hs +7/−9
CHANGES.txt view
@@ -1,5 +1,8 @@ Changelog for Hoogle (* = breaking change) +5.0.17.14, released 2020-01-08+ #334, allow haskell-src-exts-1.23+ #333, disable Aelve Codesearch links 5.0.17.13, released 2019-12-07 #331, make --count work with --json #332, support ?q= as well as ?hoogle= (since it used to be q)
LICENSE view
@@ -1,4 +1,4 @@-Copyright Neil Mitchell 2004-2019.+Copyright Neil Mitchell 2004-2020. All rights reserved. Redistribution and use in source and binary forms, with or without
hoogle.cabal view
@@ -1,13 +1,13 @@ cabal-version: >= 1.18 build-type: Simple name: hoogle-version: 5.0.17.13+version: 5.0.17.14 license: BSD3 license-file: LICENSE category: Development author: Neil Mitchell <ndmitchell@gmail.com> maintainer: Neil Mitchell <ndmitchell@gmail.com>-copyright: Neil Mitchell 2004-2019+copyright: Neil Mitchell 2004-2020 synopsis: Haskell API Search description: Hoogle is a Haskell API search engine, which allows you to@@ -61,7 +61,7 @@ foundation >= 0.0.13, old-locale, hashable,- haskell-src-exts >= 1.22 && < 1.23,+ haskell-src-exts >= 1.22 && < 1.24, http-conduit >= 2.3, http-types, js-flot,
html/index.html view
@@ -33,6 +33,6 @@ <div id="body"> #{body} </div>- <div id="footer">© <a href="http://ndmitchell.com">Neil Mitchell</a> 2004-2019, version #{version}</div>+ <div id="footer">© <a href="http://ndmitchell.com">Neil Mitchell</a> 2004-2020, version #{version}</div> </body> </html>
src/Action/Server.hs view
@@ -19,7 +19,7 @@ import Data.Version import Paths_hoogle import Data.Maybe-import Control.Monad+import Control.Monad.Extra import Text.Read import System.IO.Extra import General.Str@@ -194,18 +194,16 @@ H.div ! H.class_ "ans" $ do H.a ! H.href (H.stringValue $ showURL local haddock targetURL) $ displayItem query targetItem- when links $ do- H.div ! H.class_ "links" $ H.a ! H.href (H.stringValue $ useLink is) $ "Uses"+ when links $+ whenJust (useLink is) $ \link ->+ H.div ! H.class_ "links" $ H.a ! H.href (H.stringValue link) $ "Uses" H.div ! H.class_ "from" $ showFroms local haddock is H.div ! H.class_ "doc newline shut" $ H.preEscapedString targetDocs where- useLink :: [Target] -> String+ useLink :: [Target] -> Maybe String useLink [t] | isNothing $ targetPackage t =- "https://packdeps.haskellers.com/reverse/" ++ extractName (targetItem t)- useLink ts@(t:_) =- "https://codesearch.aelve.com/haskell/search?query=" ++ escapeURL (extractName $ targetItem t) ++- "&filter=" ++ intercalate "|" (mapMaybe (fmap fst . targetModule) ts) ++- "&precise=on"+ Just $ "https://packdeps.haskellers.com/reverse/" ++ extractName (targetItem t)+ useLink _ = Nothing add x = ("?" ++) $ intercalate "&" $ map (joinPair "=") $ case break ((==) "hoogle" . fst) args of