From 9edab21aeb6e4884b9f9193877f4eab3009323cb Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Thu, 9 Sep 2010 19:55:54 -0700
Subject: [PATCH] html.streams: fix typo in stack effect for emit-html.

---
 basis/html/streams/streams.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/html/streams/streams.factor b/basis/html/streams/streams.factor
index 6b98874703..fbce1e81d7 100644
--- a/basis/html/streams/streams.factor
+++ b/basis/html/streams/streams.factor
@@ -73,7 +73,7 @@ MACRO: make-css ( pairs -- str )
     span-css-style
     [ swap [XML <span style=<->><-></span> XML] ] unless-empty ; inline
 
-: emit-html ( quot stream -- )
+: emit-html ( stream quot -- )
     dip data>> push ; inline
 
 : image-path ( path -- images-path )