From ac1c4e2563026570bf4673e50820fe030bba1c67 Mon Sep 17 00:00:00 2001 From: Albert Krewinkel Date: Mon, 12 Jan 2026 21:42:09 +0100 Subject: [PATCH 1/2] Include 2026 in copyright years --- LICENSE | 2 +- hslua-module-doclayout.cabal | 2 +- test/test-hslua-module-doclayout.hs | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/LICENSE b/LICENSE index f8a4ae7..7e9e78b 100644 --- a/LICENSE +++ b/LICENSE @@ -1,6 +1,6 @@ MIT License -Copyright (c) 2020-2025 Albert Krewinkel +Copyright (c) 2020-2026 Albert Krewinkel Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal diff --git a/hslua-module-doclayout.cabal b/hslua-module-doclayout.cabal index c61d846..70e43ec 100644 --- a/hslua-module-doclayout.cabal +++ b/hslua-module-doclayout.cabal @@ -9,7 +9,7 @@ license: MIT license-file: LICENSE author: Albert Krewinkel maintainer: Albert Krewinkel -copyright: © 2020-2025 Albert Krewinkel +copyright: © 2020-2026 Albert Krewinkel category: Foreign build-type: Simple extra-doc-files: README.md diff --git a/test/test-hslua-module-doclayout.hs b/test/test-hslua-module-doclayout.hs index 4c58204..7431eae 100644 --- a/test/test-hslua-module-doclayout.hs +++ b/test/test-hslua-module-doclayout.hs @@ -2,7 +2,7 @@ {-# LANGUAGE TypeApplications #-} {-| Module : Main -Copyright : © 2020-2024 Albert Krewinkel +Copyright : © 2020-2026 Albert Krewinkel License : MIT Maintainer : Albert Krewinkel From ac0b4c3b7342e73bc20d4f8b8475584fbc38edd1 Mon Sep 17 00:00:00 2001 From: Albert Krewinkel Date: Mon, 12 Jan 2026 21:43:53 +0100 Subject: [PATCH 2/2] Fix type specifiers in function documentations --- src/HsLua/Module/DocLayout.hs | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/src/HsLua/Module/DocLayout.hs b/src/HsLua/Module/DocLayout.hs index 05f8f4f..b18f8ac 100644 --- a/src/HsLua/Module/DocLayout.hs +++ b/src/HsLua/Module/DocLayout.hs @@ -410,10 +410,10 @@ concat :: LuaError e => DocumentedFunction e concat = defun "concat" ### liftPure2 (\docs optSep -> mconcat $ maybe docs (`intersperse` docs) optSep) - <#> parameter (peekList peekDoc) "`{Doc,...}`" "docs" "list of Docs" + <#> parameter (peekList peekDoc) "{Doc,...}" "docs" "list of Docs" <#> opt (parameter peekDoc "Doc" "sep" "separator (default: none)") =#> docResult "concatenated doc" - #? "Concatenates a list of `Doc`s." + #? "Concatenates a list of [[Doc]]s." -- | Wraps a @'Doc'@ in double quotes double_quotes :: LuaError e => DocumentedFunction e @@ -421,7 +421,7 @@ double_quotes = defun "double_quotes" ### liftPure Doc.doubleQuotes <#> docParam "doc" =#> docResult "`doc` enclosed by `\"` chars" - #? "Wraps a `Doc` in double quotes." + #? "Wraps a [[Doc]] in double quotes." -- | Makes a @'Doc'@ flush against the left margin. flush :: LuaError e => DocumentedFunction e @@ -429,7 +429,7 @@ flush = defun "flush" ### liftPure Doc.flush <#> docParam "doc" =#> docResult "flushed `doc`" - #? "Makes a `Doc` flush against the left margin." + #? "Makes a [[Doc]] flush against the left margin." -- | Creates a hanging indent. hang :: LuaError e => DocumentedFunction e @@ -469,7 +469,7 @@ literal = defun "literal" ### liftPure Doc.literal <#> textParam "text" "literal value" =#> docResult "doc contatining just the literal string" - #? "Creates a `Doc` from a string." + #? "Creates a [[Doc]] from a string." -- | Indents a @'Doc'@ by the specified number of spaces. nest :: LuaError e => DocumentedFunction e @@ -478,7 +478,7 @@ nest = defun "nest" <#> docParam "doc" <#> integralParam "ind" "indentation size" =#> docResult "`doc` indented by `ind` spaces" - #? "Indents a `Doc` by the specified number of spaces." + #? "Indents a [[Doc]] by the specified number of spaces." -- | Removes leading blank lines from a @'Doc'@. nestle :: LuaError e => DocumentedFunction e @@ -486,7 +486,7 @@ nestle = defun "nestle" ### liftPure Doc.nestle <#> docParam "doc" =#> docResult "`doc` with leading blanks removed" - #? "Removes leading blank lines from a `Doc`." + #? "Removes leading blank lines from a [[Doc]]." -- | Makes a @'Doc'@ non-reflowable. nowrap :: LuaError e => DocumentedFunction e @@ -494,7 +494,7 @@ nowrap = defun "nowrap" ### liftPure Doc.nowrap <#> docParam "doc" =#> docResult "same as input, but non-reflowable" - #? "Makes a `Doc` non-reflowable." + #? "Makes a [[Doc]] non-reflowable." -- | Puts a @'Doc'@ in parentheses. parens :: LuaError e => DocumentedFunction e @@ -524,7 +524,7 @@ quotes = defun "quotes" ### liftPure Doc.quotes <#> docParam "doc" =#> docResult "doc enclosed in `'`." - #? "Wraps a `Doc` in single quotes." + #? "Wraps a [[Doc]] in single quotes." -- | Like @'rblock'@ but aligned to the right. rblock :: LuaError e => DocumentedFunction e