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

[factor.git] / basis / db / types / types.factor

diff --git a/basis/db/types/types.factor b/basis/db/types/types.factor
index 6405959396cd2dce5e4e77bfbb90397930a17c61..bec97983c714710b196170b2b32b99ad1e1f0364 100644 (file)
--- a/basis/db/types/types.factor
+++ b/basis/db/types/types.factor
@@ -35,7 +35,7 @@ SYMBOL: IGNORE
 ERROR: not-persistent class ;
 
 : db-table-name ( class -- object )
-    dup "db-table" word-prop [ ] [ not-persistent ] ?if ;
+    [ "db-table" word-prop ] [ not-persistent ] ?unless ;
 
 : db-columns ( class -- object )
     superclasses-of [ "db-columns" word-prop ] map concat ;