brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Make today configurable from commnad-line.

Browse source
This commit is contained in:
Dominik Pantůček 2023-05-22 08:53:39 +02:00
parent ea9336b9bc
commit 3deb187036
2 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/cal-period.scm
View file

@ -29,6 +29,7 @@
cal-period cal-period
( (
*current-month* *current-month*
*current-day*
make-cal-period make-cal-period

5
src/hackerbase.scm
View file

@ -42,6 +42,7 @@
progress progress
cal-period cal-period
cal-month cal-month
cal-day
util-git util-git
util-dict-list util-dict-list
util-stdout) util-stdout)
@ -84,6 +85,10 @@
(-month (YYYY-MM) "Specify current month" (-month (YYYY-MM) "Specify current month"
(-normal-month- #f) (-normal-month- #f)
(*current-month* (string->cal-month YYYY-MM))) (*current-month* (string->cal-month YYYY-MM)))
(-today (YYYY-MM-DD) "Specify current day"
(-normal-month- #f)
(*current-day* (string->cal-day YYYY-MM-DD))
(*current-month* (cal-day->month (*current-day*))))
(-tstyle (style) "Use given table style: debug, ascii, unicode" (-tstyle (style) "Use given table style: debug, ascii, unicode"
(*table-border-style* (string->symbol style))) (*table-border-style* (string->symbol style)))
(-apikey (fname) "File with Fio API keys" (-apikey (fname) "File with Fio API keys"