d_win32.rc
author Claus Gittinger <cg@exept.de>
Thu, 28 Aug 2003 11:01:57 +0200
changeset 553 d930c20df35e
parent 534 8eae68eefa5c
child 565 b0e4a1b19cba
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"*
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 * $Header$
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
 *
399
5a842f5d7196 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 348
diff changeset
     4
 * MIMEType: application/x-smalltalk-source
5a842f5d7196 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 348
diff changeset
     5
 *
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 * ST/X startup configuration file:
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 * display configuration - windowsNT / windows95 
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
 *"
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
"/
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
"/ here, fixup the keyboard mapping for
534
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    12
"/ windows feel - especially, 
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    13
"/     change           from            to 
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    14
"/     cut/copy/paste   ALT-[XCV]       CTRL-[XCV]
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    15
"/     HOME-key         BeginOfText     BeginOfLine
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    16
"/     END-key          EndOfText       EndOfLine
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    17
"/     F1-key           Again           Help
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    18
"/     F3-key                           FindAgain
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    19
"/     F4-key                           CommentSelection
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    20
"/     F5-key                           UncommentSelection
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    21
"/     F8-key                           (replace-) Again
8eae68eefa5c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 481
diff changeset
    22
"/     UserInterrupt    CTRL-C          BREAK/PAUSE
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
|map|
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
map := Display keyboardMap.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
'd_win32.rc [info]: changing keyboard to win95 defaults...' infoPrintCR.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
'd_win32.rc [info]: (CTRL-C is now COPY - unix ST/X users should have a look at d_win32.rc)' infoPrintCR.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
map bindValue:#UserInterrupt to:#Pause.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
map bindValue:#Copy          to:#Ctrlc.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
map bindValue:#Cut           to:#Ctrlx.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
map bindValue:#Paste         to:#Ctrlv.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
map bindValue:#BeginOfLine   to:#Home.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
map bindValue:#EndOfLine     to:#End.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
553
d930c20df35e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 534
diff changeset
    38
map bindValue:#Format        to:#CtrlF.
d930c20df35e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 534
diff changeset
    39
d930c20df35e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 534
diff changeset
    40
map bindValue:#LearnKeyboardMacro    to:#CtrlL.
d930c20df35e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 534
diff changeset
    41
map bindValue:#ExecuteKeyboardMacro  to:#CtrlM.
d930c20df35e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 534
diff changeset
    42
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
map bindValue:#Help          to:#F1.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
map bindValue:#Again         to:#F8.
348
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    45
map bindValue:#FindAgain     to:#F3.   "/ search again in same direction
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    46
map bindValue:#CommentSelection   to:#F4.
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    47
map bindValue:#UncommentSelection to:#F5.
481
e7ac8dea1db0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 425
diff changeset
    48
map bindValue:#CodeCompletion     to:#F2.
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
312
3cee7a37fc4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 304
diff changeset
    50
"/ map bindValue:#Cmdc          to:#Cmdc.
3cee7a37fc4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 304
diff changeset
    51
"/ map bindValue:#Cmdx          to:#Cmdx.
3cee7a37fc4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 304
diff changeset
    52
"/ map bindValue:#Cmdv          to:#Cmdv.
425
32fbd261b8ef menu-key opens popUpMenu
Claus Gittinger <cg@exept.de>
parents: 399
diff changeset
    53
32fbd261b8ef menu-key opens popUpMenu
Claus Gittinger <cg@exept.de>
parents: 399
diff changeset
    54
map bindValue:#Menu          to:#Appl.             
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
!