From 6c041aefbca67b6bfae66af945e8f4e10ef238af Mon Sep 17 00:00:00 2001
From: Bert Burgemeister <trebbu@googlemail.com>
Date: Sat, 6 Aug 2011 15:58:06 +0200
Subject: [PATCH] Fix argument list of with-output-to-string

---
 clqr-input-output.tex | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/clqr-input-output.tex b/clqr-input-output.tex
index 47d4859..bb71d7b 100644
--- a/clqr-input-output.tex
+++ b/clqr-input-output.tex
@@ -1175,8 +1175,10 @@
   }
 
   \IT{(\MC*{WITH-OUTPUT-TO-STRING} (\VAR{foo} 
-    \Op{\DES{\VAR{string}}\DF{\NIL}} \Op{\kwd{:element-type}
-      \VAR{type}\DF{\kwd{character}}}) \OPn{(\kwd{declare}
+    \OP{\DES{\VAR{string}}\DF{\NIL}
+      \Op{\kwd{:element-type}
+        \VAR{type}\DF{\kwd{character}}}}) 
+    \OPn{(\kwd{declare}
       \OPn{\NEV{\VAR{decl}}})} \PROGN{\VAR{form}})}
   {
     Evaluate \VAR{form}s with \VAR{foo} locally bound to an output
-- 
2.11.4.GIT