diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-10-27 16:08:39 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-11-06 00:46:25 +0100 |
| commit | a89a4b152fda1c6346e82ea92af498fcfbc53089 (patch) | |
| tree | 6319dfaa7ae1a4af5d1250a564abd90f14c19976 /module/c | |
| parent | Remove unused 'color-if'. (diff) | |
| download | calp-a89a4b152fda1c6346e82ea92af498fcfbc53089.tar.gz calp-a89a4b152fda1c6346e82ea92af498fcfbc53089.tar.xz | |
Add proper text calendar.
Previously the program `cal` was used, this was slow and unreliable.
Diffstat (limited to '')
| -rw-r--r-- | module/calp/terminal.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/calp/terminal.scm b/module/calp/terminal.scm index c4b30a54..395c85d6 100644 --- a/module/calp/terminal.scm +++ b/module/calp/terminal.scm @@ -10,7 +10,6 @@ :use-module (vulgar) :use-module (vulgar info) :use-module (vulgar color) - :use-module (vulgar components) :use-module (vcomponent) :use-module (vcomponent datetime) @@ -18,6 +17,7 @@ :use-module (vcomponent util group) :use-module (text util) + :use-module ((text calendar) :select (cal-3)) :use-module (text flow) :use-module (ice-9 format) @@ -127,7 +127,7 @@ (display (G_ "== Day View ==")) (newline) - (display-calendar-header! (current-page this)) + (cal-3 (current-page this)) ;; display event list (display-event-table |