diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-22 19:38:41 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-22 19:38:41 +0100 |
| commit | 65369b49c45f46a50c8f4df0625162a7b04e0c5e (patch) | |
| tree | e602abe299ad030657680bca6f3e7bffb76896aa /main.scm | |
| parent | Add clean-scheme to makefile. (diff) | |
| download | calp-65369b49c45f46a50c8f4df0625162a7b04e0c5e.tar.gz calp-65369b49c45f46a50c8f4df0625162a7b04e0c5e.tar.xz | |
Move take-to to util.
Diffstat (limited to '')
| -rwxr-xr-x | main.scm | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -20,10 +20,6 @@ (terminal escape) (terminal util)) -(define (take-to lst i) - (if (> i (length lst)) - lst (take lst i))) - (define (ev-time<? a b) (time<? (attr a 'DTSTART) (attr b 'DTSTART))) |