--- a/HTMLDocGenerator.st	Sun Jul 06 13:31:25 1997 +0200
+++ b/HTMLDocGenerator.st	Thu Jul 31 19:55:30 1997 +0200
@@ -903,7 +903,7 @@
         s nextPutLine:'<code><pre>'.
         examples do:[:line |
             line withoutSeparators = '[exBegin]' ifTrue:[
-                s nextPutLine:'<a INFO="execute the example" type="example">'.
+                s nextPutLine:'<a INFO="execute the example" type="example" showresult>'.
             ] ifFalse:[
                 line withoutSeparators = '[exEnd]' ifTrue:[
                     s nextPutLine:'</a>'.
@@ -932,7 +932,7 @@
     "
 
     "Created: 24.4.1996 / 15:01:59 / cg"
-    "Modified: 22.3.1997 / 16:13:24 / cg"
+    "Modified: 31.7.1997 / 19:54:21 / cg"
 !
 
 htmlDocOf:aClass backRef:backRef
@@ -1594,5 +1594,5 @@
 !HTMLDocGenerator class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.19 1997-04-10 08:39:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.20 1997-07-31 17:55:30 cg Exp $'
 ! !