Language change: tuple slot setter words with stack effect ( value object -- ) are...

[factor.git] / basis / help / tips / tips.factor

diff --git a/basis/help/tips/tips.factor b/basis/help/tips/tips.factor
index 06f2255dfaa0f28a9f089fa287b2fe142c491ac6..241e54d967c746261b61a13626fe622aca48746d 100644 (file)
--- a/basis/help/tips/tips.factor
+++ b/basis/help/tips/tips.factor
@@ -14,7 +14,7 @@ M: tip forget* tips get remove-eq! drop ;
 
 M: tip where loc>> ;
 
-M: tip set-where (>>loc) ;
+M: tip set-where loc<< ;
 
 : <tip> ( content -- tip ) f tip boa ;