--- 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.
-
-!