]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/colors/colors.factor
factor: use ??if instead of ?if-old
[factor.git] / basis / colors / colors.factor
index d1fc3e5bf79144cdd54680b2d52a043ce9c04515..e31f228779c011a224533517821414378b2bc991 100644 (file)
@@ -91,7 +91,7 @@ PRIVATE>
 ERROR: no-such-color name ;
 
 : named-color ( name -- color )
-    dup colors at [ ] [ no-such-color ] ?if ;
+    [ colors at ] [ no-such-color ] ?unless ;
 
 : parse-color ( str -- color )
     "#" ?head [ hex>rgba ] [ named-color ] if ;