diff options
| author | David Thompson <dthompson2@worcester.edu> | 2021-10-21 08:16:23 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2021-10-21 08:16:23 -0400 |
| commit | 9028c2caf111aa1030ba402f4116f33d898a6479 (patch) | |
| tree | e4b6eb16af510d243a359de4a90ae986181515ff | |
| parent | 479c76ca9ac3f0ed932eb5f0913b8784c82efab2 (diff) | |
scripting: agenda: Fix clear-agenda.
Do not reset the time, and remember to clear the poll set!
| -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) |