diff --git a/extra/pdf/values/values.factor b/extra/pdf/values/values.factor
index f2c7a54f10..c41e66d1fb 100644
--- a/extra/pdf/values/values.factor
+++ b/extra/pdf/values/values.factor
@@ -33,11 +33,7 @@ M: t pdf-value drop "true" ;
 M: f pdf-value drop "false" ;
 
 M: color pdf-value
-    [ red>> ] [ green>> ] [ blue>> ] tri
-    "%f %f %f" sprintf ;
-
-M: gray pdf-value
-    gray>> dup dup "%f %f %f" sprintf ;
+    >rgba-components drop "%f %f %f" sprintf ;
 
 M: font pdf-value
     [