Merge pull request #304 from JeongUkJae/master

Show package's version on generated docs

CHANGES.md

@@ -24,6 +24,8 @@ To be released.
     to customize the look and feel of the result pages.
  -  Fixed an incorrect processing of [CommonMark] thight list items: it had
     crashed when a thight list item contains blocks other than paragraphs.
+ -  Package's version became shown on the generated docs.
+    [[#297], [#304] by Jeong Ukjae]
 
 ### Python target
 
@@ -40,7 +42,9 @@ To be released.
 
 [#126]: https://github.com/nirum-lang/nirum/issues/126
 [#281]: https://github.com/nirum-lang/nirum/pull/281
+[#297]: https://github.com/nirum-lang/nirum/issues/297
 [#300]: https://github.com/nirum-lang/nirum/pull/300
+[#304]: https://github.com/nirum-lang/nirum/pull/304
 [CommonMark]: http://commonmark.org/
 [table syntax extension]: https://github.github.com/gfm/#tables-extension-
 [special attributes extension]: https://michelf.ca/projects/php-markdown/extra/#spe-attr

src/Nirum/Targets/Docs.hs

@@ -18,6 +18,7 @@ import Data.Map.Strict (Map, mapKeys, mapWithKey, unions)
 import qualified Data.Text as T
 import qualified Data.Text.Lazy as TL
 import Data.Text.Encoding (decodeUtf8, encodeUtf8)
+import qualified Data.SemVer
 import System.FilePath
 import Text.Blaze (ToMarkup (preEscapedToMarkup))
 import Text.Blaze.Html.Renderer.Utf8 (renderHtml)
@@ -111,9 +112,11 @@ $doctype 5
                 <a class="index selected" href="#{root}index.html">
                     <strong>
                         #{docsTitle $ target pkg}
+                        #{Data.SemVer.toText $ version md}
             $else
                 <a class="index" href="#{root}index.html">
                     #{docsTitle $ target pkg}
+                    #{Data.SemVer.toText $ version md}
             <ul.manuals.toc>
                 $forall (documentPath, doc) <- documentPairs
                     $if currentPage == DocumentPage documentPath