add packages "About" page

Author: rlefevre

assets/style.css

@@ -161,6 +161,25 @@ pre {
 }
 
 
+
+/* ABOUT */
+
+
+.pkg-about h1 {
+  margin-bottom: 10px;
+}
+
+.pkg-about ul {
+  list-style: none;
+  padding: 0;
+}
+
+.pkg-constraint {
+  white-space: nowrap;
+}
+
+
+
 /* PACKAGE NAVIGATION */
 
 

elm.json

@@ -26,4 +26,4 @@
         "direct": {},
         "indirect": {}
     }
-}
+}

src/frontend/Href.elm

@@ -2,6 +2,7 @@ module Href exposing
   ( toProject
   , toVersion
   , toModule
+  , toAbout
   )
 
 
@@ -28,6 +29,11 @@ toModule author project version moduleName maybeValue =
   Url.custom Url.Absolute [ "packages", author, project, vsnToString version, String.replace "." "-" moduleName ] [] maybeValue
 
 
+toAbout : String -> String -> Maybe V.Version -> String
+toAbout author project version =
+  Url.absolute [ "packages", author, project, vsnToString version, "about" ] []
+
+
 
 -- HELPERS
 

src/frontend/Main.elm

@@ -266,6 +266,7 @@ focus_ : Parser (Docs.Focus -> a) a
 focus_ =
   oneOf
     [ map Docs.Readme top
+    , map Docs.About (s "about")
     , map Docs.Module (moduleName_ </> fragment identity)
     ]