X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;ds=sidebyside;f=8sync%2Fagenda.scm;h=828153033840ce180a8914c3fecdda42139d440d;hb=4998e7a9fe3b303923d918cd6087633d5302274f;hp=1d2515607b7d932598b3f3e7c9742f74fbfcbd21;hpb=08fb307989f2696ddbd2ad535f55558c577b2fdb;p=8sync.git diff --git a/8sync/agenda.scm b/8sync/agenda.scm index 1d25156..8281530 100644 --- a/8sync/agenda.scm +++ b/8sync/agenda.scm @@ -1,5 +1,5 @@ ;;; 8sync --- Asynchronous programming for Guile -;;; Copyright (C) 2015, 2016 Christopher Allan Webber +;;; Copyright © 2015, 2016, 2017 Christopher Allan Webber ;;; ;;; This file is part of 8sync. ;;; @@ -561,8 +561,6 @@ on suspendable ports." "Start up the AGENDA" (install-suspendable-ports!) (parameterize ((%current-agenda-prompt (agenda-prompt-tag agenda)) - ;; @@: Couldn't we just parameterize this at the start of - ;; the agenda...? (current-read-waiter wait-for-readable) (current-write-waiter wait-for-writable)) (while (not (stop-condition agenda))