Fix period with comments usage.
This commit is contained in:
parent
ae8b994a39
commit
1a14fd2bc4
2 changed files with 6 additions and 3 deletions
|
@ -45,7 +45,8 @@
|
||||||
utils
|
utils
|
||||||
table
|
table
|
||||||
listing
|
listing
|
||||||
ansi)
|
ansi
|
||||||
|
period)
|
||||||
|
|
||||||
;; Prints human-readable information
|
;; Prints human-readable information
|
||||||
(define (print-member-info mr)
|
(define (print-member-info mr)
|
||||||
|
@ -109,8 +110,8 @@
|
||||||
(map
|
(map
|
||||||
(lambda (p)
|
(lambda (p)
|
||||||
(list
|
(list
|
||||||
(month->string (car p))
|
(month->string (period-since p))
|
||||||
(month->string (cdr p))))
|
(month->string (period-before p))))
|
||||||
v))
|
v))
|
||||||
#:col-border #t)))
|
#:col-border #t)))
|
||||||
(else
|
(else
|
||||||
|
|
|
@ -28,6 +28,8 @@
|
||||||
(module
|
(module
|
||||||
period
|
period
|
||||||
(
|
(
|
||||||
|
period-since
|
||||||
|
period-before
|
||||||
period-markers->periods
|
period-markers->periods
|
||||||
periods-duration
|
periods-duration
|
||||||
month-in-periods?
|
month-in-periods?
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue