I5S35M3T3SJN63HNODE2I6IAFKI4RZTYVJLHQRZ4AM3J3BND5HJAC
66SF6NA6WQF5U3B3CP2QWMCAZUL5DLQI3ASE2EOKCLTEU4PXHDSQC
KHIWQ533KB3UVDZJ6SQLT5YKEJYINDQVP2VVFOGQGDCVLG6BLO4AC
4QPDDW46NZLFA2GZ4YFOLEMHHP5BPHLBOTSZMOJ3UMGRQ4DH3N7QC
, oneline
oneline :: Doc () -> Doc ()oneline = group
oneline :: Doc () -> Doc ()
oneline = group
<+> maybe emptyDoc (("-" <+>) . pretty . PrintableText.unPrintableText) (loc ^. section)
<> maybe emptyDoc ((" -" <+>) . pretty . PrintableText.unPrintableText) (loc ^. section)