diff options
-rw-r--r-- | hs/src/Handlingar.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/hs/src/Handlingar.hs b/hs/src/Handlingar.hs index 929ed4a..a878da3 100644 --- a/hs/src/Handlingar.hs +++ b/hs/src/Handlingar.hs @@ -130,7 +130,7 @@ main = do tex <- runIOorExplode $ do texTemplate <- compileDefaultTemplate "latex" (Pandoc meta bs, appendices) <- buildPrimary readVimwiki (pack heading) text - let apx = appendices >>= (\(is, a, b) -> [Header 1 ("bilaga:" <> a, [], []) is, Plain [Str b]]) + let apx = reverse appendices >>= (\(is, a, b) -> [Header 1 ("bilaga:" <> a, [], []) is, Plain [Str b]]) let trail = [ RawBlock (Format "latex") "\\appendix" ] <> apx let content = Pandoc meta $ bs <> trail let opts = [ ("boxlinks", toVal True) |