d_sun.rc
author Claus Gittinger <cg@exept.de>
Tue, 06 Jul 1999 17:16:07 +0200
changeset 368 e998b6392d10
parent 356 4275f251cb37
child 399 5a842f5d7196
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
     1
"*
0cb137a77319 Initial revision
claus
parents:
diff changeset
     2
 * $Header$
84
06f58dd9b0ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8
diff changeset
     3
 *
209
22793de5d56e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 199
diff changeset
     4
 * ST/X startup configuration file:
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
     5
 * display configuration - sun
100
7d469db172b1 commentary
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
     6
 *
7d469db172b1 commentary
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
     7
 * If your display is the above, create a symbolic link
7d469db172b1 commentary
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
     8
 * d_<hostname-of-display>.rc -> d_sun.rc
7d469db172b1 commentary
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
     9
 *
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
    10
 *"
0cb137a77319 Initial revision
claus
parents:
diff changeset
    11
199
2f1fb3201393 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 100
diff changeset
    12
"/
2f1fb3201393 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 100
diff changeset
    13
"/ the following helps to avoid the annoying click
2f1fb3201393 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 100
diff changeset
    14
"/ on newly opened windows ...
2f1fb3201393 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 100
diff changeset
    15
"/
2f1fb3201393 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 100
diff changeset
    16
StandardSystemView takeFocusWhenMapped:true.
2f1fb3201393 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 100
diff changeset
    17
2f1fb3201393 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 100
diff changeset
    18
5
420e4af41733 *** empty log message ***
claus
parents: 3
diff changeset
    19
"*
420e4af41733 *** empty log message ***
claus
parents: 3
diff changeset
    20
 * view style - uncomment the one you like
420e4af41733 *** empty log message ***
claus
parents: 3
diff changeset
    21
 *"
7
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    22
8
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    23
"/ actually, openwin-style is not finished yet
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    24
"/ you may prefer #iris, #motif or #normal
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    25
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    26
View defaultStyle:#openwin.
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    27
"/ View defaultStyle:#iris.
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    28
"/ View defaultStyle:#normal.
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    29
"/ View defaultStyle:#motif.
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
    30
!
0cb137a77319 Initial revision
claus
parents:
diff changeset
    31
0cb137a77319 Initial revision
claus
parents:
diff changeset
    32
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
    33
 define suns left-function keys
0cb137a77319 Initial revision
claus
parents:
diff changeset
    34
 (this really should be done by xmodmap/server)
0cb137a77319 Initial revision
claus
parents:
diff changeset
    35
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
    36
|map|
0cb137a77319 Initial revision
claus
parents:
diff changeset
    37
0cb137a77319 Initial revision
claus
parents:
diff changeset
    38
map := Display keyboardMap.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    39
0cb137a77319 Initial revision
claus
parents:
diff changeset
    40
map bindValue:#Find  to:#F19.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    41
map bindValue:#Cut   to:#F20.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    42
map bindValue:#Paste to:#F18.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    43
map bindValue:#Open  to:#F17.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    44
map bindValue:#Copy  to:#F16.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    45
map bindValue:#Undo  to:#F14.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    46
map bindValue:#Props to:#F13.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    47
map bindValue:#Again to:#F12.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    48
map bindValue:#Prior to:#F29.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    49
map bindValue:#Next  to:#F35.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    50
map bindValue:#Home  to:#F27.
0cb137a77319 Initial revision
claus
parents:
diff changeset
    51
map bindValue:#End   to:#R13.
356
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    52
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    53
"/ a kludge: some Xservers send #Delete for both the backspace
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    54
"/ and the Delete key. In this case, we use the Backspace function
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    55
"/ for both keys. If your Xserver does not do this (it should not)
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    56
"/ remove or comment the following 'bindValue:#BackSpace'-line:
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    57
"/
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    58
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    59
map bindValue:#BackSpace     to:#Delete.
4275f251cb37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
    60
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
    61
!