stxapp.rc
author Patrik Svestka <patrik.svestka@gmail.com>
Mon, 05 Jul 2021 12:43:35 +0200
branchjv
changeset 1630 7de40ef06ef6
parent 1456 d1e4a43b35f2
permissions -rw-r--r--
1.7.2 Checking all powershell versions (pick first working one), detecting manual switch from a user, better handling of trucky batch characters Details: - fixing finding powershell (check for all versions and pick first one which is correct) in case the registry holds only powershell key, but is not valid powershell instance - Adding a simple manual_switch_detection variable to detect manual switch from user - make the launcher work better with tricky characters for cmd.exe (|, <, >, &)

"/ Encoding: iso8859-1
"/
"/ $Header$
"/
"/ MIMEType: application/x-smalltalk-source
"/
"/ ST/X startup command file:
"/
"/ example for a very simple startup file for standAlone applications
"/ this is read for standAlone apps, if no <commandName>.rc is found.
"/
"/ without an stxapp.rc, no display is opened and no setup of keyboardMap or viewStyle
"/ is performed - this still works correctly, but may be invonvenient for the
"/ user ...

[
    Screen openDefaultDisplay:nil.
] on:Screen deviceOpenErrorSignal do:[:ex|
    ('smalltalk.rc [warning]: No Display connection to: ', ex parameter) errorPrintCR.
].
Display notNil ifTrue:[
    Smalltalk fileIn:'display.rc'.
    Smalltalk fileIn:'keyboard.rc'.
].
Smalltalk silentLoading:true.
!