diff options
| -rw-r--r-- | chickadee/scripting/agenda.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/chickadee/scripting/agenda.scm b/chickadee/scripting/agenda.scm index eb1fa65..5500dd4 100644 --- a/chickadee/scripting/agenda.scm +++ b/chickadee/scripting/agenda.scm @@ -59,7 +59,7 @@ (define (%agenda-clear! agenda) (heap-clear! (agenda-queue agenda)) - (set-agenda-time! agenda 0) + (hash-clear! (agenda-poll-set agenda)) *unspecified*) (define (%update-agenda agenda dt) |