kernel: Retire $complex-shuffle

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

diff --git a/basis/help/help.factor b/basis/help/help.factor
index 29a372aab13896aac877629e371fc64f0bb6b69c..968efcc4a6108835d38cba368765cdd601a18c3c 100644 (file)
--- a/basis/help/help.factor
+++ b/basis/help/help.factor
@@ -24,7 +24,7 @@ GENERIC: word-help* ( word -- content )
     ] when* ;
 
 : fix-shuffle ( content word -- content' word )
-    over [ { $shuffle $complex-shuffle } member? ] find drop [
+    over [ \ $shuffle = ] find drop [
         '[ _ cut unclip ] dip [
             stack-effect 2array 1array glue
         ] keep