diff options
| author | Christopher R. Nelson <christopher.nelson@languidnights.com> | 2023-06-19 13:03:52 -0400 |
|---|---|---|
| committer | Christopher R. Nelson <christopher.nelson@languidnights.com> | 2023-06-19 13:03:52 -0400 |
| commit | 33f3751e8228086c577e6d38c9b6bcbce9febfea (patch) | |
| tree | dd3a3b70ca8e0bedffd9bad73cefd37e81585931 /reading-heap.scm | |
| parent | cf8ac29ff959d8c5ac8edf23cbfca1be16328f63 (diff) | |
feat: add next, new, and consume functions
Diffstat (limited to 'reading-heap.scm')
| -rwxr-xr-x | reading-heap.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/reading-heap.scm b/reading-heap.scm index 48ad8eb..a7e3044 100755 --- a/reading-heap.scm +++ b/reading-heap.scm @@ -67,6 +67,8 @@ (priorities (map media-priority media)) (heap (fold heap-insert 'E priorities media))) (server-setup (option-ref options 'service-socket)) - (rh-receive heap))))) + (rh-receive heap + (option-ref options 'media-library) + (string-append (option-ref options 'media-library) "/archive/")))))) (main (command-line)) |