blob: 58b85bd9e9f10631d7bbfbf167f56cca8047970f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
Confirm "This will install Free Pascal for MPW.¶n¶nDo you want to proceed ?"
Set installerdir `Directory`
Set destdir `GetFileName -wd -m 'Select where I should install the FreePascal folder' "{Boot}"`FreePascal:
# Write startup script
Echo "Set -e FPCDIR ¶'{destdir}¶'" > "{MPW}Startup Items:FPC Startup"
Echo 'Set -e Commands "{Commands},{FPCDIR}bin:"' >> "{MPW}Startup Items:FPC Startup"
# Copy files
Set Exit 0
Delete -y "{destdir}" ³ Dev:Null
Set Exit 1
NewFolder "{destdir}"
Duplicate -y "{installerdir}Freepascal":Å "{destdir}"
# Write configuration file
Echo "# Configuration file for Free Pascal for MPW" > "{destdir}bin:fpc.cfg"
Echo "-Fu¶'{destdir}units:rtl:¶'" >> "{destdir}bin:fpc.cfg"
Echo "-l" >> "{destdir}bin:fpc.cfg"
Echo "-vi" >> "{destdir}bin:fpc.cfg"
Alert "The installation was successful. Please restart MPW.¶n¶nLicense information is located in the docs folder."
|
