d_win32.rc
branchjv
changeset 1507 ecb149794455
parent 1243 1fc6b3f01e48
child 1508 b2b32caf589e
--- a/d_win32.rc	Tue May 23 22:59:08 2017 +0100
+++ b/d_win32.rc	Fri Jun 02 22:22:59 2017 +0100
@@ -7,59 +7,18 @@
  *
  * ST/X startup configuration file:
  * display configuration - windows
+ *
+ * This file used to define keyboard mapping for more Windows-like feel.  
+ * Hoever, mappings have been unified and moved to
+ * 
+ *    DeviceWorkstation class>>defaultKeyboardMapDefinition
+ *
+ * Eventually, this file will vanish. 
+ * 
+ * Put all your customizations to some `rc.d` file and or to your private
+ * startup script. 
  *"
 !
 StandardSystemView takeFocusWhenMapped:true.
 !
 
-"/
-"/ here, fixup the keyboard mapping for
-"/ windows feel - especially,
-"/     change           from            to
-"/     cut/copy/paste   ALT-[XCV]       CTRL-[XCV]
-"/     HOME-key         BeginOfText     BeginOfLine
-"/     END-key          EndOfText       EndOfLine
-"/     F1-key           Again           Help
-"/     F3-key                           FindAgain
-"/     F4-key                           CommentSelection
-"/     F5-key                           UncommentSelection
-"/     F8-key                           (replace-) Again
-"/     UserInterrupt    CTRL-C          BREAK/PAUSE
-
-|map|
-
-map := Display keyboardMap.
-
-map bindValue:#Cmd  to:#Menu.
-map bindValue:#Menu to:#Appl.
-
-map bindValue:#UserInterrupt to:#Pause.
-map bindValue:#Copy          to:#Ctrlc.
-map bindValue:#Cut           to:#Ctrlx.
-map bindValue:#Paste         to:#Ctrlv.
-map bindValue:#BeginOfLine   to:#Home.
-map bindValue:#EndOfLine     to:#End.
-
-map bindValue:#Format        to:#CtrlF.
-
-"/ map bindValue:#LearnKeyboardMacro    to:#CtrlL.
-"/ map bindValue:#ExecuteKeyboardMacro  to:#CtrlM.
-
-map bindValue:#Help          to:#F1.
-map bindValue:#Rename        to:#F2.
-map bindValue:#Again         to:#F8.
-map bindValue:#FindAgain     to:#F3.   "/ search again in same direction
-map bindValue:#CommentSelection   to:#F4.
-map bindValue:#UncommentSelection to:#F5.
-"/ map bindValue:#CodeCompletion     to:#F2.
-
-"/ map bindValue:#Menu                 to:#Appl.
-map bindValue:#LearnKeyboardMacro   to:#CtrlF2.
-map bindValue:#ExecuteKeyboardMacro to:#CmdF2.
-
-map bindValue:(Character value:181) to:(#Cmd copyWith:(Character value:181)) asSymbol.
-map bindValue:(Character value:16r80) to:(#Cmd copyWith:(Character value:16r80)) asSymbol.
-map bindValue:(Character value:16rB2) to:(#Cmd copyWith:(Character value:16rB2)) asSymbol.
-map bindValue:(Character value:16rB3) to:(#Cmd copyWith:(Character value:16rB3)) asSymbol.
-
-!