From 5d3fb5700e18326a862243d2ebad91cb09f51cdc Mon Sep 17 00:00:00 2001 From: Christopher Lemmer Webber Date: Fri, 28 Aug 2020 12:04:36 -0400 Subject: [PATCH] pub -> publish --- goblins/actor-lib/pubsub.rkt | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/goblins/actor-lib/pubsub.rkt b/goblins/actor-lib/pubsub.rkt index ec88d1e..fdbc292 100644 --- a/goblins/actor-lib/pubsub.rkt +++ b/goblins/actor-lib/pubsub.rkt @@ -15,13 +15,13 @@ [(unsubscribe subscriber) (bcom (^pubsub bcom (set-remove subscribers subscriber)))] [(subscribers) subscribers] - [pub + [publish (make-keyword-procedure (lambda (kws kw-vals . args) (for ([subscriber subscribers]) (keyword-apply <-np kws kw-vals subscriber args))))] - [pub-except + [publish-except (make-keyword-procedure (lambda (kws kw-vals excluding . args) (define subscriber-subset @@ -50,11 +50,11 @@ ($ pubsub 'unsubscribe subscriber)] [(add val) ($ base-seteq 'add val) - ($ pubsub 'pub 'add val) + ($ pubsub 'publish 'add val) (void)] [(remove val) ($ base-seteq 'remove val) - ($ pubsub 'pub 'remove val)] + ($ pubsub 'publish 'remove val)] #:extends base-seteq)) (define ps-set