--- a/CodeView.st	Tue Dec 09 19:47:45 2008 +0100
+++ b/CodeView.st	Tue Dec 09 19:48:03 2008 +0100
@@ -168,11 +168,11 @@
     <resource: #keyboard (#Format #Explain #Help 
                           #CommentSelection #UncommentSelection)>
 
-    (key == #Format)  ifTrue:[^ self format].
-    (key == #Explain) ifTrue:[^ self explain].
-    (key == #Help)    ifTrue:[^ self explain].
-    (key == #CommentSelection)    ifTrue:[^ self commentSelection].
-    (key == #UncommentSelection)  ifTrue:[^ self uncommentSelection].
+    (key == #Format)  ifTrue:[self format. ^ self].
+    (key == #Explain) ifTrue:[self explain. ^ self].
+    (key == #Help)    ifTrue:[self explain. ^ self].
+    (key == #CommentSelection)    ifTrue:[self commentSelection. ^ self].
+    (key == #UncommentSelection)  ifTrue:[self uncommentSelection. ^ self].
 
     super keyPress:key x:x y:y
 
@@ -319,5 +319,5 @@
 !CodeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.59 2008-11-26 15:44:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.60 2008-12-09 18:48:03 cg Exp $'
 ! !