304
|
1 |
"*
|
|
2 |
* $Header$
|
|
3 |
*
|
|
4 |
* ST/X startup configuration file:
|
|
5 |
* display configuration - windowsNT / windows95
|
|
6 |
*"
|
|
7 |
|
|
8 |
"/
|
|
9 |
"/ here, fixup the keyboard mapping for
|
|
10 |
"/ windows feel - especially, change
|
|
11 |
"/ cut/copy/paste from ALT-[XCV] into CTRL-[XCV]
|
|
12 |
"/ HOME-key from BeginOfText to BeginOfLine
|
|
13 |
"/ END-key from EndOfText to EndOfLine
|
|
14 |
"/ F1-key from Again to Help
|
|
15 |
"/ UserInterrupt now on PAUSE
|
|
16 |
"/ F8 now on PAUSE
|
|
17 |
|
|
18 |
|map|
|
|
19 |
|
|
20 |
map := Display keyboardMap.
|
|
21 |
|
|
22 |
'd_win32.rc [info]: changing keyboard to win95 defaults...' infoPrintCR.
|
|
23 |
'd_win32.rc [info]: (CTRL-C is now COPY - unix ST/X users should have a look at d_win32.rc)' infoPrintCR.
|
|
24 |
|
|
25 |
map bindValue:#UserInterrupt to:#Pause.
|
|
26 |
map bindValue:#Copy to:#Ctrlc.
|
|
27 |
map bindValue:#Cut to:#Ctrlx.
|
|
28 |
map bindValue:#Paste to:#Ctrlv.
|
|
29 |
map bindValue:#BeginOfLine to:#Home.
|
|
30 |
map bindValue:#EndOfLine to:#End.
|
|
31 |
|
|
32 |
map bindValue:#Help to:#F1.
|
|
33 |
map bindValue:#Again to:#F8.
|
|
34 |
|
312
|
35 |
"/ map bindValue:#Cmdc to:#Cmdc.
|
|
36 |
"/ map bindValue:#Cmdx to:#Cmdx.
|
|
37 |
"/ map bindValue:#Cmdv to:#Cmdv.
|
304
|
38 |
!
|
|
39 |
|