factor: use ??if instead of ?if-old

[factor.git] / extra / help / lint / coverage / coverage.factor

diff --git a/extra/help/lint/coverage/coverage.factor b/extra/help/lint/coverage/coverage.factor
index 82cce19c5cf14ce2ba4b4abbede30aae6b83cc73..4c121ea5435ec32afdaf3c9d22584eb4131b1658 100644 (file)
--- a/extra/help/lint/coverage/coverage.factor
+++ b/extra/help/lint/coverage/coverage.factor
@@ -30,7 +30,7 @@ CONSTANT: ignored-words {
 }
 
 : (word-help) ( word -- content )
-    dup "help" word-prop [ ] [ word-help* ] ?if ;
+    [ "help" word-prop ] [ word-help* ] ?unless ;
 
 GENERIC: write-object* ( object -- )
 M: string write-object* write ;