--- a/KeyboardForwarder.st	Mon Jun 16 18:58:05 1997 +0200
+++ b/KeyboardForwarder.st	Mon Jun 16 20:24:05 1997 +0200
@@ -108,9 +108,9 @@
 
         catcher := Plug new.
         catcher respondTo:#keyPress:x:y:view:
-                    with:[:key :x :y :view | Transcript showCR:'cought keyPress: ' , key printString.].
+                    with:[:key :x :y :view | Transcript showCR:'caught keyPress: ' , key printString.].
         catcher respondTo:#keyRelease:x:y:view:
-                    with:[:key :x :y :view | Transcript showCR:'cought keyRelease: ' , key printString.].
+                    with:[:key :x :y :view | Transcript showCR:'caught keyRelease: ' , key printString.].
 
         top := StandardSystemView new.
         top extent:200@200.
@@ -131,7 +131,7 @@
 
         catcher := Plug new.
         catcher respondTo:#keyPress:x:y:view:
-                    with:[:key :x :y :view | Transcript showCR:'cought return'].
+                    with:[:key :x :y :view | Transcript showCR:'caught return'].
 
         top := StandardSystemView new.
         top extent:200@200.
@@ -458,5 +458,5 @@
 !KeyboardForwarder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/KeyboardForwarder.st,v 1.19 1997-05-01 15:46:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/KeyboardForwarder.st,v 1.20 1997-06-16 18:23:55 cg Exp $'
 ! !