NorfairKing/feedback
1
1
Fork 0
mirror of https://github.com/NorfairKing/feedback.git synced 2024-11-22 12:04:21 +03:00
Code Issues Projects Releases Wiki Activity

fix a little loop description output bug

Browse Source
This commit is contained in:
Tom Sydney Kerckhove 2024-10-27 12:15:10 +01:00
parent ec87036794
commit 4d96c92167
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
feedback/src/Feedback/Loop/OptParse.hs
View File

@ -78,6 +78,7 @@ prettyConfiguration mConf = case mConf of
loopConfigLine :: String -> LoopConfiguration -> [Chunk] loopConfigLine :: String -> LoopConfiguration -> [Chunk]
loopConfigLine loopName LoopConfiguration {..} = loopConfigLine loopName LoopConfiguration {..} =
[ loopNameChunk $ loopName <> ":", [ loopNameChunk loopName,
": ",
maybe "no description" (chunk . T.pack) loopConfigDescription maybe "no description" (chunk . T.pack) loopConfigDescription
] ]