casr-logbook-meta-html 0.0.3 → 0.0.4

raw patch · 3 files changed

+18/−3 lines, 3 filesdep +casr-logbook-htmldep ~casr-logbook-metaPVP ok

version bump matches the API change (PVP)

Dependencies added: casr-logbook-html

Dependency ranges changed: casr-logbook-meta

API changes (from Hackage documentation)

Files

• casr-logbook-meta-html.cabal +3/−2
• changelog +4/−0
• src/Data/Aviation/Casr/Logbook/Meta/Html.hs +11/−1

@@ -1,5 +1,5 @@ name:               casr-logbook-meta-html-version:            0.0.3+version:            0.0.4 license:            OtherLicense license-file:       LICENSE author:             Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>@@ -34,7 +34,8 @@   build-depends:                     base < 5 && >= 4.8                     , casr-logbook-types >= 0.0.1 && < 0.1-                    , casr-logbook-meta >= 0.0.4 && < 0.2+                    , casr-logbook-html >= 0.0.2 && < 0.1+                    , casr-logbook-meta >= 0.0.4 && < 0.1                     , lucid >= 2.9 && < 3                     , lens >= 4.1 && < 5                     , text >= 1.2 && < 1.3

@@ -1,3 +1,7 @@+0.0.4++* Add `htmlLogbookDocumentMeta` function.+ 0.0.3  * Use `casr-logbook-types` and not `casr-logbook`.

@@ -26,6 +26,7 @@   , htmlSimulatorFlightMeta   , htmlExamMeta   , htmlBriefingMeta+  , htmlLogbookDocumentMeta   , showCentsAsDollars   , showThousandCentsAsDollars   , showHundredCentsAsDollars@@ -34,12 +35,14 @@  import Control.Category((.), id) import Control.Monad(when)-import Data.Aviation.Casr.Logbook.Types (+import Data.Aviation.Casr.Logbook.Types(     AircraftFlight   , SimulatorFlight   , Briefing   , Exam+  , Logbook   )+import Data.Aviation.Casr.Logbook.Html.Html(htmlLogbookDocument) import Data.Aviation.Casr.Logbook.Meta(     AircraftFlightExpense(ExpenseAircraftUsage, ExpenseAircraftLanding)   , AircraftFlightMeta(AircraftFlightMeta)@@ -361,6 +364,13 @@     do  span_ [class_ "briefingmetaheader"] "Expenses"         ul_ [] $           mapM_ (li_ [class_ "expense"] . htmlBriefingExpense b) q) s++htmlLogbookDocumentMeta ::+  Html ()+  -> Logbook AircraftFlightMeta SimulatorFlightMeta ExamMeta BriefingMeta+  -> Html ()+htmlLogbookDocumentMeta =+  htmlLogbookDocument htmlAircraftFlightMeta htmlSimulatorFlightMeta htmlExamMeta htmlBriefingMeta  ----