--- a/HTMLDocGenerator.st	Thu Jul 26 22:52:16 2012 +0200
+++ b/HTMLDocGenerator.st	Fri Jul 27 11:09:29 2012 +0200
@@ -890,9 +890,7 @@
         outStream nextPutLine:'<pre>'.
 
         warnLines := self undentedToFirstLinesIndent:warnLines.
-        warnLines do:[:aLine |
-            outStream nextPutLine:aLine
-        ].
+        outStream nextPutAllLines:warnLines.
         outStream nextPutLine:'</pre>'.
         self generateHorizontalLine.
     ].
@@ -904,9 +902,7 @@
         outStream nextPutLine:'<pre>'.
         hintLines := self undentedToFirstLinesIndent:hintLines.
 
-        hintLines do:[:aLine |
-            outStream nextPutLine:aLine
-        ].
+        outStream nextPutAllLines:hintLines.
         outStream nextPutLine:'</pre>'.
         self generateHorizontalLine.
     ].
@@ -976,7 +972,7 @@
     "
 
     "Created: / 24-04-1996 / 15:01:59 / cg"
-    "Modified: / 05-11-2007 / 17:22:54 / cg"
+    "Modified: / 27-07-2012 / 09:29:45 / cg"
 !
 
 htmlDocOf:aClass backRef:backRef
@@ -2697,9 +2693,9 @@
 !HTMLDocGenerator class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.94 2011-08-08 16:54:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.95 2012-07-27 09:09:29 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.94 2011-08-08 16:54:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.95 2012-07-27 09:09:29 cg Exp $'
 ! !