|
304
|
1 |
"*
|
|
|
2 |
* $Header$
|
|
|
3 |
*
|
|
399
|
4 |
* MIMEType: application/x-smalltalk-source
|
|
|
5 |
*
|
|
304
|
6 |
* ST/X startup configuration file:
|
|
|
7 |
* display configuration - windowsNT / windows95
|
|
|
8 |
*"
|
|
|
9 |
|
|
|
10 |
"/
|
|
|
11 |
"/ here, fixup the keyboard mapping for
|
|
|
12 |
"/ windows feel - especially, change
|
|
|
13 |
"/ cut/copy/paste from ALT-[XCV] into CTRL-[XCV]
|
|
|
14 |
"/ HOME-key from BeginOfText to BeginOfLine
|
|
348
|
15 |
"/ END-key from EndOfText to EndOfLine
|
|
304
|
16 |
"/ F1-key from Again to Help
|
|
348
|
17 |
"/ F3-key now FindAgain
|
|
|
18 |
"/ F4-key now CommentSelection
|
|
|
19 |
"/ F5-key now UncommentSelection
|
|
|
20 |
"/ F8-key now (replace-) Again
|
|
304
|
21 |
"/ UserInterrupt now on PAUSE
|
|
|
22 |
|
|
|
23 |
|map|
|
|
|
24 |
|
|
|
25 |
map := Display keyboardMap.
|
|
|
26 |
|
|
|
27 |
'd_win32.rc [info]: changing keyboard to win95 defaults...' infoPrintCR.
|
|
|
28 |
'd_win32.rc [info]: (CTRL-C is now COPY - unix ST/X users should have a look at d_win32.rc)' infoPrintCR.
|
|
|
29 |
|
|
|
30 |
map bindValue:#UserInterrupt to:#Pause.
|
|
|
31 |
map bindValue:#Copy to:#Ctrlc.
|
|
|
32 |
map bindValue:#Cut to:#Ctrlx.
|
|
|
33 |
map bindValue:#Paste to:#Ctrlv.
|
|
|
34 |
map bindValue:#BeginOfLine to:#Home.
|
|
|
35 |
map bindValue:#EndOfLine to:#End.
|
|
|
36 |
|
|
|
37 |
map bindValue:#Help to:#F1.
|
|
|
38 |
map bindValue:#Again to:#F8.
|
|
348
|
39 |
map bindValue:#FindAgain to:#F3. "/ search again in same direction
|
|
|
40 |
map bindValue:#CommentSelection to:#F4.
|
|
|
41 |
map bindValue:#UncommentSelection to:#F5.
|
|
481
|
42 |
map bindValue:#CodeCompletion to:#F2.
|
|
304
|
43 |
|
|
312
|
44 |
"/ map bindValue:#Cmdc to:#Cmdc.
|
|
|
45 |
"/ map bindValue:#Cmdx to:#Cmdx.
|
|
|
46 |
"/ map bindValue:#Cmdv to:#Cmdv.
|
|
425
|
47 |
|
|
|
48 |
map bindValue:#Menu to:#Appl.
|
|
304
|
49 |
!
|
|
|
50 |
|