1 "*

     2  * $Header$

     3  * display configuration - sun

     4  *"

     5 

     6 View defaultStyle:#openwin

     7 !

     8 

     9 "

    10  define suns left-function keys

    11  (this really should be done by xmodmap/server)

    12 "

    13 |map|

    14 

    15 map := Display keyboardMap.

    16 

    17 map bindValue:#Find  to:#F19.

    18 map bindValue:#Cut   to:#F20.

    19 map bindValue:#Paste to:#F18.

    20 map bindValue:#Open  to:#F17.

    21 map bindValue:#Copy  to:#F16.

    22 map bindValue:#Undo  to:#F14.

    23 map bindValue:#Props to:#F13.

    24 map bindValue:#Again to:#F12.

    25 map bindValue:#Prior to:#F29.

    26 map bindValue:#Next  to:#F35.

    27 map bindValue:#Home  to:#F27.

    28 map bindValue:#End   to:#R13.

    29 !

    30 

    31