d_win32.rc
author Claus Gittinger <cg@exept.de>
Mon, 18 Oct 1999 10:19:04 +0200
changeset 392 386c03e96039
parent 348 dc429709126b
child 399 5a842f5d7196
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
 *
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
 * ST/X startup configuration file:
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 * display configuration - windowsNT / windows95 
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 *"
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
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
"/ here, fixup the keyboard mapping for
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
"/ windows feel - especially, change 
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
"/     cut/copy/paste    from ALT-[XCV] into CTRL-[XCV]
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"/     HOME-key from BeginOfText to BeginOfLine
348
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    13
"/     END-key  from EndOfText to EndOfLine
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
"/     F1-key from Again to Help
348
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    15
"/     F3-key now FindAgain
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    16
"/     F4-key now CommentSelection
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    17
"/     F5-key now UncommentSelection
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    18
"/     F8-key now (replace-) Again
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
"/     UserInterrupt now on PAUSE
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
|map|
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
map := Display keyboardMap.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
'd_win32.rc [info]: changing keyboard to win95 defaults...' infoPrintCR.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
'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
    27
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
map bindValue:#UserInterrupt to:#Pause.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
map bindValue:#Copy          to:#Ctrlc.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
map bindValue:#Cut           to:#Ctrlx.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
map bindValue:#Paste         to:#Ctrlv.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
map bindValue:#BeginOfLine   to:#Home.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
map bindValue:#EndOfLine     to:#End.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
map bindValue:#Help          to:#F1.
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
map bindValue:#Again         to:#F8.
348
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    37
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
    38
map bindValue:#CommentSelection   to:#F4.
dc429709126b F3 is now: search-again;
Claus Gittinger <cg@exept.de>
parents: 312
diff changeset
    39
map bindValue:#UncommentSelection to:#F5.
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
312
3cee7a37fc4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 304
diff changeset
    41
"/ map bindValue:#Cmdc          to:#Cmdc.
3cee7a37fc4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 304
diff changeset
    42
"/ map bindValue:#Cmdx          to:#Cmdx.
3cee7a37fc4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 304
diff changeset
    43
"/ map bindValue:#Cmdv          to:#Cmdv.
304
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
!
b7ef06173222 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45