--- a/CodeView.st Sat Jan 06 14:02:26 1996 +0100
+++ b/CodeView.st Tue Jan 09 18:29:28 1996 +0100
@@ -100,10 +100,9 @@
keyPress:key x:x y:y
"catch keyboard shortcuts"
- <resource: #keyboard (#Accept #Explain #Help
+ <resource: #keyboard (#Explain #Help
#CommentSelection #UncommentSelection)>
- (key == #Accept) ifTrue:[^ self accept].
(key == #Explain) ifTrue:[^ self explain].
(key == #Help) ifTrue:[^ self explain].
(key == #CommentSelection) ifTrue:[^ self commentSelection].
@@ -243,5 +242,5 @@
!CodeView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.23 1995-11-24 09:13:18 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.24 1996-01-09 17:29:25 cg Exp $'
! !