Simple period comments display.
This commit is contained in:
parent
1a14fd2bc4
commit
0a688fc057
2 changed files with 9 additions and 5 deletions
|
@ -110,8 +110,10 @@
|
|||
(map
|
||||
(lambda (p)
|
||||
(list
|
||||
(month->string (period-since p))
|
||||
(month->string (period-before p))))
|
||||
(string-append (month->string (period-since p)) " "
|
||||
(or (period-scomment p) ""))
|
||||
(string-append (month->string (period-before p)) " "
|
||||
(or (period-bcomment p) ""))))
|
||||
v))
|
||||
#:col-border #t)))
|
||||
(else
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue