From c19ec60942cbc4e1abeb7111737ef52e7f13544b Mon Sep 17 00:00:00 2001
From: Chris Double <chris.double@double.co.nz>
Date: Sat, 27 Aug 2005 03:46:46 +0000
Subject: [PATCH] fix eval-responder for recent factor changes

---
 contrib/cont-responder/eval-responder.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/contrib/cont-responder/eval-responder.factor b/contrib/cont-responder/eval-responder.factor
index 3d74ad2ad9..23eabb84c1 100644
--- a/contrib/cont-responder/eval-responder.factor
+++ b/contrib/cont-responder/eval-responder.factor
@@ -79,7 +79,7 @@ USE: sequences
 : make-eval-javascript ( string -- string )
   #! Give a string return some javascript that when
   #! executed will set the eval textarea to that string.
-  [ "document.forms.main.eval.value=\"" % escape-quotes % "\"" % ] make-string ;
+  [ "document.forms.main.eval.value=\"" % escape-quotes % "\"" % ] "" make ;
 : write-eval-link ( string -- )
   #! Given text to evaluate, create an A HREF link which when
   #! clicked sets the eval textarea to that value.
@@ -115,7 +115,7 @@ USE: sequences
   #! Return an html fragment dispaying the source
   #! of the given word.
   dup dup
-  <namespace> [
+  {{ }} clone [
     "browser" "responder" set
     <table border= "1" table> 
       <tr> <th colspan= "2" th> "Source" write </th> </tr>