From d0c5b43dc5a5c036e28c6af5444f1585a74eb1da Mon Sep 17 00:00:00 2001 From: Sam Anklesaria Date: Wed, 27 May 2009 16:49:40 -0500 Subject: [PATCH] all signals update on activation --- extra/ui/frp/signals/signals.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/extra/ui/frp/signals/signals.factor b/extra/ui/frp/signals/signals.factor index 3c6c4103bc..a08a49e329 100644 --- a/extra/ui/frp/signals/signals.factor +++ b/extra/ui/frp/signals/signals.factor @@ -5,8 +5,8 @@ TUPLE: multi-model < model ; GENERIC: (model-changed) ( model observer -- ) : ( models kind -- model ) f swap new-model [ [ add-dependency ] curry each ] keep ; M: multi-model model-changed over value>> [ (model-changed) ] [ 2drop ] if ; -M: multi-model model-activated dup dependencies>> dup length 1 = - [ first swap model-changed ] [ 2drop ] if ; +M: multi-model model-activated dup dependencies>> [ value>> ] find nip + [ swap model-changed ] [ drop ] if* ; TUPLE: basic-model < multi-model ; M: basic-model (model-changed) [ value>> ] dip set-model ;