d_osx.rc
author Claus Gittinger <cg@exept.de>
Wed, 27 Mar 2019 23:35:00 +0100
changeset 1594 3aa76efb2c47
parent 1521 f28d61bbd51d
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
638
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"*
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 * Encoding: iso8859-1
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
 *
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
 * $Header$
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 *
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 * MIMEType: application/x-smalltalk-source
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 *
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
 * ST/X startup configuration file:
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
 *
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 * display configuration - OSX (MAC-OS-10 with X-server), only tried with german keyboard)
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
 *
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
 * If your display is the above, create a symbolic link
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
 * d_<hostname-of-display>.rc -> d_next.rc
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
 *
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
 *"
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
"*
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
 * view style
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
 *"
1386
02c006ef8d87 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1359
diff changeset
    20
"/ View defaultStyle:#mswindowsVista.
02c006ef8d87 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1359
diff changeset
    21
"/ View defaultStyle:#mswindows8.
02c006ef8d87 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1359
diff changeset
    22
"/ View defaultStyle:#Adwaita.
02c006ef8d87 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1359
diff changeset
    23
"/ View defaultStyle:#'macosx'.
02c006ef8d87 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1359
diff changeset
    24
View defaultStyle:#'macosx_yosemite'.
638
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
!
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
1521
f28d61bbd51d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1502
diff changeset
    27
"/ notice that Shift-Wheel is not passed to XQuartz apps (bug or feature??)
f28d61bbd51d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1502
diff changeset
    28
"/ configure horizontal scroll to be done with ALT-wheel
f28d61bbd51d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1502
diff changeset
    29
UserPreferences current metaIsMouseWheelZoom:false.
f28d61bbd51d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1502
diff changeset
    30
!
f28d61bbd51d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1502
diff changeset
    31
638
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
"*
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
 * keyboard mapping
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
 *"
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
|map|
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
map := Display keyboardMap.
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
map bindValue:#Alt to:#'Meta_L'.
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
map bindValue:#Alt to:#'Meta_L'.
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
map bindValue:(Character value:16r2260) to:#'notequal'.
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
map bindValue:(Character value:16r201E) to:#'doublelowquotemark'.
1502
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    43
map bindValue:(Character value:16r201A) to:#'singlelowquotemark'.
638
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
map bindValue:(Character value:16r201C) to:#'leftdoublequotemark'.
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
map bindValue:(Character value:16r201D) to:#'rightdoublequotemark'.
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
map bindValue:(Character value:16r2018) to:#'leftsinglequotemark'.
639
cd7ca2a66be4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 638
diff changeset
    47
map bindValue:(Character value:16r2264) to:#'lessthanequal'.
cd7ca2a66be4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 638
diff changeset
    48
map bindValue:(Character value:16r2265) to:#'greaterthanequal'.
1502
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    49
map bindValue:(Character value:16r00AB) to:#'guillemotleft'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    50
map bindValue:(Character value:16r00BB) to:#'guillemotright'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    51
map bindValue:(Character value:16r00B7) to:#'periodcentered'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    52
map bindValue:(Character value:16r00A1) to:#'exclamdown'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    53
map bindValue:(Character value:16r00BF) to:#'questiondown'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    54
map bindValue:(Character value:16r00A3) to:#'sterling'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    55
map bindValue:(Character value:16r00A2) to:#'cent'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    56
map bindValue:(Character value:16r2122) to:#'trademark'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    57
map bindValue:(Character value:16r2020) to:#'dagger'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    58
map bindValue:(Character value:16r2021) to:#'doubledagger'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    59
map bindValue:(Character value:16r2202) to:#'partialderivative'.
79078b921999 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1386
diff changeset
    60
map bindValue:(Character value:16r00CF) to:#'Idiaeresis'.
638
36972b5c1520 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
!
639
cd7ca2a66be4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 638
diff changeset
    62
cd7ca2a66be4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 638
diff changeset
    63
Display buttonPressTimeForMenu:1.
cd7ca2a66be4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 638
diff changeset
    64
!
1281
eae7bb6f40ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 639
diff changeset
    65
eae7bb6f40ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 639
diff changeset
    66
"/ does not seem to have a good set of unicode fonts available...
eae7bb6f40ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 639
diff changeset
    67
FontDescription defaultEncoding: #'iso8859-1'.
eae7bb6f40ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 639
diff changeset
    68
!