From 7b1f63e7291f376d73ead3fe368315781258d0ed Mon Sep 17 00:00:00 2001 From: Christopher Allan Webber Date: Thu, 19 Nov 2015 21:40:51 -0600 Subject: [PATCH] (hash-keys hash) not (hash-keys selector) ... how did that even compile before? --- loopy.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/loopy.scm b/loopy.scm index cb7ee81..f346a9e 100644 --- a/loopy.scm +++ b/loopy.scm @@ -318,7 +318,7 @@ (define %current-agenda (make-parameter #f)) (define (update-agenda-from-select! agenda) - (define (hash-keys selector) + (define (hash-keys hash) (hash-map->list (lambda (k v) k) hash)) (define (get-wait-time) ;; TODO: we need to figure this out based on whether there's anything -- 2.31.1