Fix links to non-purescript dependencies (purescript#386)

dunhamsteve · Jan 31, 2019 · b00917f · b00917f
1 parent d683362
commit b00917f
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 1 deletion.
diff --git a/src/Handler/Packages.hs b/src/Handler/Packages.hs
@@ -5,6 +5,7 @@ import Text.Julius (rawJS)
 import Text.Blaze (ToMarkup, toMarkup)
 import qualified Data.Char as Char
 import Data.Version
+import qualified Data.Text as T
 import qualified Data.Text.Lazy as TL
 import qualified Language.PureScript.Docs as D
 import Web.Bower.PackageMeta (PackageName, runPackageName, bowerDependencies, bowerLicense)
@@ -88,6 +89,10 @@ getPackageVersionR (PathPackageName pkgName) (PathVersion version) =
         $(widgetFile "packageVersion")
       return (cacheStatus, content)
 
+isPurescriptPackage :: PackageName -> Bool
+isPurescriptPackage pkgName =
+    "purescript-" `T.isPrefixOf` runPackageName pkgName
+
 getPackageIndexR :: Handler TypedContent
 getPackageIndexR =
   selectRep $ do

diff --git a/templates/packageVersion.hamlet b/templates/packageVersion.hamlet
@@ -30,5 +30,8 @@
       $forall (depPkg, versionRange) <- dependencies
         <dd .grouped-list__item>
           <div .deplink>
-            <a .deplink__link href=@{packageNameRoute depPkg}>#{runPackageName depPkg}
+            $if isPurescriptPackage depPkg
+              <a .deplink__link href=@{packageNameRoute depPkg}>#{runPackageName depPkg}
+            $else
+              <a .deplink__link href="https://libraries.io/bower/#{runPackageName depPkg}">#{runPackageName depPkg}
             <span .deplink__version>#{renderVersionRange versionRange}