Replaced hard-coded colors with constants

[factor.git] / basis / vocabs / prettyprint / prettyprint.factor

diff --git a/basis/vocabs/prettyprint/prettyprint.factor b/basis/vocabs/prettyprint/prettyprint.factor
index c180beba90421230a416caa5f31cfc6d74829505..480df1a36893fff50b1956d891fa99a4322edd28 100644 (file)
--- a/basis/vocabs/prettyprint/prettyprint.factor
+++ b/basis/vocabs/prettyprint/prettyprint.factor
@@ -1,9 +1,9 @@
 ! Copyright (C) 2009 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors arrays assocs colors colors.constants fry io
-io.styles kernel make math.order namespaces parser
+USING: accessors arrays assocs colors fry io
+io.styles kernel literals make math.order namespaces parser
 prettyprint.backend prettyprint.sections prettyprint.stylesheet
-sequences sets sorting vocabs vocabs.parser ;
+sequences sets sorting ui.gadgets.theme vocabs vocabs.parser ;
 FROM: io.styles => inset ;
 IN: vocabs.prettyprint
 
@@ -91,8 +91,8 @@ PRIVATE>
         "at the top of the source file:" print nl
     ] with-style
     {
-        { page-color COLOR: FactorLightTan }
-        { border-color COLOR: FactorDarkTan }
+        { page-color $ vocab-background-color }
+        { border-color $ vocab-border-color }
         { inset { 5 5 } }
     } [ manifest get pprint-manifest ] with-nesting
     nl nl