--- a/DisplaySurface.st	Fri Jul 22 18:20:42 2005 +0200
+++ b/DisplaySurface.st	Tue Jul 26 10:51:26 2005 +0200
@@ -1994,9 +1994,7 @@
 
     keyCommands notNil ifTrue:[
         action := keyCommands at:key ifAbsent:[nil].
-        action notNil ifTrue:[
-            action value
-        ]
+        action value
     ].
 
     key isSymbol ifTrue:[
@@ -2485,7 +2483,7 @@
 !DisplaySurface class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.124 2005-06-13 18:19:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.125 2005-07-26 08:51:26 cg Exp $'
 ! !
 
 DisplaySurface initialize!