From 9e4962dec47bf12affda1cc92bb7f10128fc3707 Mon Sep 17 00:00:00 2001 From: slava Date: Mon, 29 May 2006 20:31:05 +0000 Subject: [PATCH] Fix overly zealous Objective C method stub caching --- TODO.FACTOR.txt | 1 + library/ui/cocoa/utilities.factor | 4 ++-- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/TODO.FACTOR.txt b/TODO.FACTOR.txt index 08f27c76d2..c48b0a5224 100644 --- a/TODO.FACTOR.txt +++ b/TODO.FACTOR.txt @@ -5,6 +5,7 @@ ] - x11: rollover highlight is not reliable +- x11: window positioning not reliable + httpd: - outliners don't work - browser responder doesn't work diff --git a/library/ui/cocoa/utilities.factor b/library/ui/cocoa/utilities.factor index 7574153931..f2420dd7e3 100644 --- a/library/ui/cocoa/utilities.factor +++ b/library/ui/cocoa/utilities.factor @@ -27,10 +27,10 @@ H{ } clone super-msg-senders set-global : (cache-stub) ( method function hash -- word ) [ - over second get dup [ + over get dup [ 2nip ] [ - drop over >r sender-stub dup r> second set + drop over >r sender-stub dup r> set ] if ] bind ;