From effec0469c2d41bde94ad6fab9678037cdc640b0 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Thu, 12 Mar 2009 21:25:33 -0500
Subject: [PATCH] Don't use colors.constants in prettyprint
---
basis/prettyprint/prettyprint.factor | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/basis/prettyprint/prettyprint.factor b/basis/prettyprint/prettyprint.factor
index 2bdf3fb0ef..5eb04c9510 100644
--- a/basis/prettyprint/prettyprint.factor
+++ b/basis/prettyprint/prettyprint.factor
@@ -40,12 +40,12 @@ IN: prettyprint
\ USING: pprint-word
[ pprint-vocab ] each
\ ; pprint-word
- ] with-pprint
+ ] with-pprint nl
] unless-empty ;
: use/in. ( in use -- )
dupd remove [ { "syntax" "scratchpad" } member? not ] filter
- use. nl in. ;
+ use. in. ;
: vocab-names ( words -- vocabs )
dictionary get
@@ -61,7 +61,7 @@ IN: prettyprint
"To avoid doing this in the future, add the following USING:" print
"and IN: forms at the top of the source file:" print nl
] with-style
- { { page-color COLOR: light-gray } } [ prelude. ] with-nesting
+ { { page-color T{ rgba f 0.8 0.8 0.8 1.0 } } } [ prelude. ] with-nesting
nl nl
] print-use-hook set-global