--- a/FlyByHelp.st	Tue Jul 12 19:08:27 2011 +0200
+++ b/FlyByHelp.st	Wed Jul 13 15:15:21 2011 +0200
@@ -89,7 +89,7 @@
 keyPress:key x:x y:y view:aView
     currentHelpView notNil ifTrue:[
         "/ generate a line suitable for the resources file
-        key == #'Ctrl' ifTrue:[
+        key == $§ ifTrue:[
             aView setClipboardText:(lastHelpText storeString , '    ' , lastHelpText storeString).
             self hideHelp.
             ^ true
@@ -103,7 +103,7 @@
     ].
     ^ super keyPress:key x:x y:y view:aView
 
-    "Modified: / 28-01-2011 / 13:21:58 / cg"
+    "Modified: / 13-07-2011 / 15:13:43 / cg"
 !
 
 mouseWheelMotion:state x:x y:y amount:amount deltaTime:dTime view:aView
@@ -379,5 +379,5 @@
 !FlyByHelp class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.48 2011-07-06 16:07:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.49 2011-07-13 13:15:21 cg Exp $'
 ! !