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

[factor.git] / basis / ui / commands / commands.factor

diff --git a/basis/ui/commands/commands.factor b/basis/ui/commands/commands.factor
index 6703c91d01fe1b8b08991b8e5ff0aa74a6bdc512..0f9c672ec688e190fcd3e20391ecff0615d12746 100644 (file)
--- a/basis/ui/commands/commands.factor
+++ b/basis/ui/commands/commands.factor
@@ -24,9 +24,9 @@ GENERIC: command-word ( command -- word )
     { } like command-map boa ;
 
 : commands ( class -- hash )
-    dup "commands" word-prop [ ] [
+    [ "commands" word-prop ] [
         H{ } clone [ "commands" set-word-prop ] keep
-    ] ?if ;
+    ] ?unless ;
 
 TR: convert-command-name "-" " " ;