author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Fri, 30 Dec 2016 22:42:05 +0000 | |
branch | jv |
changeset 1484 | cef397199379 |
parent 1442 | 14aa87cd5d2d |
permissions | -rw-r--r-- |
739 | 1 |
; $Header$ |
2 |
; Script generated by ProjectDefinition. |
|
3 |
||
747
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
4 |
!define PRODUCT_NAME "Smalltalk/X" |
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
5 |
!define PRODUCT_FILENAME "SmalltalkX" |
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
6 |
!define PRODUCT_VERSION "6.2.5.0" |
739 | 7 |
!define PRODUCT_PUBLISHER "eXept Software AG" |
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
8 |
!define PRODUCT_WEB_SITE "http://www.exept.de" |
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
9 |
!define PRODUCT_UNINST_KEY "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_FILENAME}" |
739 | 10 |
!define PRODUCT_UNINST_ROOT_KEY "HKLM" |
11 |
||
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
12 |
; |
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
13 |
; SETUP_NAME can come from makefile as either setup or setup64 |
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
14 |
; |
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
15 |
!if "${SETUP_NAME}" == "" |
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
16 |
SETUP_NAME="Smalltalk/XSetup" |
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
17 |
!endif |
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
18 |
|
739 | 19 |
!define STX_ROOT "..\..\.." |
20 |
||
1144
21592225d2b3
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
1100
diff
changeset
|
21 |
SetCompressor /solid lzma |
739 | 22 |
|
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
23 |
!include "MUI2.nsh" |
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
24 |
!include "x64.nsh" |
739 | 25 |
|
26 |
; MUI Settings |
|
27 |
||
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
28 |
!define MUI_WELCOMEPAGE_TITLE_3LINES |
739 | 29 |
!define MUI_ABORTWARNING |
806
1ef29a62943f
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
794
diff
changeset
|
30 |
;; !define MUI_ICON "${NSISDIR}\Contrib\Graphics\Icons\modern-install.ico" |
855
7e8695101652
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
848
diff
changeset
|
31 |
!define MUI_ICON "stx_32x32.ico" |
806
1ef29a62943f
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
794
diff
changeset
|
32 |
;; !define MUI_UNICON "${NSISDIR}\Contrib\Graphics\Icons\modern-uninstall.ico" |
855
7e8695101652
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
848
diff
changeset
|
33 |
!define MUI_UNICON "stx_32x32.ico" |
739 | 34 |
|
35 |
; Language Selection Dialog Settings |
|
36 |
!define MUI_LANGDLL_REGISTRY_ROOT "${PRODUCT_UNINST_ROOT_KEY}" |
|
37 |
!define MUI_LANGDLL_REGISTRY_KEY "${PRODUCT_UNINST_KEY}" |
|
38 |
!define MUI_LANGDLL_REGISTRY_VALUENAME "NSIS:Language" |
|
39 |
||
40 |
; Welcome page |
|
41 |
!insertmacro MUI_PAGE_WELCOME |
|
42 |
; License page |
|
43 |
; !define MUI_LICENSEPAGE_CHECKBOX |
|
44 |
||
45 |
||
46 |
!insertmacro MUI_PAGE_COMPONENTS |
|
47 |
; Directory page |
|
48 |
!insertmacro MUI_PAGE_DIRECTORY |
|
49 |
; Instfiles page |
|
50 |
!insertmacro MUI_PAGE_INSTFILES |
|
51 |
; Finish page |
|
52 |
!insertmacro MUI_PAGE_FINISH |
|
53 |
||
54 |
; Uninstaller pages |
|
55 |
!insertmacro MUI_UNPAGE_INSTFILES |
|
56 |
||
57 |
; Language files |
|
58 |
!insertmacro MUI_LANGUAGE "English" |
|
59 |
!insertmacro MUI_LANGUAGE "German" |
|
60 |
||
61 |
; MUI end ------ |
|
62 |
||
63 |
||
64 |
||
65 |
Name "${PRODUCT_NAME} ${PRODUCT_VERSION}" |
|
66 |
VIProductVersion "${PRODUCT_VERSION}.0" |
|
67 |
VIAddVersionKey /LANG=${LANG_ENGLISH} "ProductName" "${PRODUCT_NAME}" |
|
68 |
VIAddVersionKey /LANG=${LANG_ENGLISH} "CompanyName" "${PRODUCT_PUBLISHER}" |
|
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
69 |
VIAddVersionKey /LANG=${LANG_ENGLISH} "FileVersion" "6.2.32767.32767" |
739 | 70 |
VIAddVersionKey /LANG=${LANG_ENGLISH} "FileDescription" "${PRODUCT_NAME} Installer" |
71 |
VIAddVersionKey /LANG=${LANG_ENGLISH} "ProductVersion" "${PRODUCT_VERSION}" |
|
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
72 |
VIAddVersionKey /LANG=${LANG_ENGLISH} "LegalCopyright" "Copyright Claus Gittinger 1988-2012\nCopyright eXept Software AG 1998-2012" |
739 | 73 |
|
74 |
||
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
75 |
OutFile "${SETUP_NAME}.exe" |
739 | 76 |
InstallDir "$PROGRAMFILES\stx" |
77 |
ShowInstDetails show |
|
78 |
ShowUnInstDetails show |
|
79 |
||
80 |
Function .onInit |
|
81 |
!insertmacro MUI_LANGDLL_DISPLAY |
|
82 |
FunctionEnd |
|
83 |
||
84 |
InstType Full |
|
85 |
InstType Partial |
|
86 |
||
87 |
Section "Programme" Section1 |
|
88 |
SectionIn 1 2 |
|
89 |
SetOutPath "$INSTDIR\bin" |
|
90 |
SetOverwrite ifnewer |
|
995
27c3b6ef08b5
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
989
diff
changeset
|
91 |
File "stx.exe" "stx.com" |
739 | 92 |
File "*.dll" |
93 |
File "symbols.stc" |
|
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
94 |
File "*.stx" |
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
95 |
File "*.rc" |
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
96 |
File /r /x CVS /x ".*" resources |
739 | 97 |
|
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
98 |
|
892
fb8da076dae3
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
885
diff
changeset
|
99 |
|
739 | 100 |
|
1048
41a98224a315
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
1041
diff
changeset
|
101 |
|
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
102 |
WriteRegStr HKCR "Stx.SmalltalkX.1" "" "SmalltalkX File" |
995
27c3b6ef08b5
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
989
diff
changeset
|
103 |
WriteRegStr HKCR "Stx.SmalltalkX.1\DefaultIcon" "" '$INSTDIR\bin\stx.exe,0' |
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
104 |
WriteRegStr HKCR "Stx.SmalltalkX.1\Shell\open" "" $(appOpen) |
995
27c3b6ef08b5
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
989
diff
changeset
|
105 |
WriteRegStr HKCR "Stx.SmalltalkX.1\Shell\open\command" "" '"$INSTDIR\bin\stx.exe" -- "%1"' |
739 | 106 |
SectionEnd |
107 |
||
747
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
108 |
;; Section "Online-Documentation for Smalltalk/X" Section2 |
739 | 109 |
;; SectionIn 1 |
110 |
;; SetOutPath "$INSTDIR\doc" |
|
111 |
;; SetOverwrite ifnewer |
|
832
318955431e2d
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
825
diff
changeset
|
112 |
;; File /r /x CVS "${STX_ROOT}\stx\smalltalk\doc\*" |
739 | 113 |
;; SectionEnd |
114 |
||
747
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
115 |
;; Section "Smalltalk/X Libraries and Demos" Section3 |
739 | 116 |
;; SectionIn 1 |
117 |
;; SetOutPath "$INSTDIR\lib" |
|
118 |
;; SetOverwrite ifnewer |
|
832
318955431e2d
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
825
diff
changeset
|
119 |
;; ; File /r /x CVS "${STX_ROOT}\stx\smalltalk\examples\*" |
739 | 120 |
;; SectionEnd |
121 |
;; |
|
747
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
122 |
;; Section "Smalltalk/X Reports and Printing" Section4 |
739 | 123 |
;; SectionIn 1 |
124 |
;; SetOutPath "$INSTDIR\reportGenerator" |
|
125 |
;; SetOverwrite ifnewer |
|
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
126 |
;; ; File /r /x CVS "..\reportGenerator\java" "..\reportGenerator\rules" "..\reportGenerator\*.xml" "..\reportGenerator\*.xslt" "..\reportGenerator\CloseApp.exe" "..\reportGenerator\expecco.jpg" |
739 | 127 |
;; SectionEnd |
128 |
||
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
129 |
|
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
130 |
|
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
131 |
|
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
132 |
|
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
133 |
|
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
134 |
|
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
135 |
|
739 | 136 |
Section -AdditionalIcons |
137 |
SetOutPath "$INSTDIR\bin" |
|
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
138 |
WriteIniStr "$INSTDIR\${PRODUCT_FILENAME}.url" "InternetShortcut" "URL" "${PRODUCT_WEB_SITE}" |
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
139 |
CreateDirectory "$SMPROGRAMS\${PRODUCT_FILENAME}" |
995
27c3b6ef08b5
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
989
diff
changeset
|
140 |
CreateShortCut "$SMPROGRAMS\${PRODUCT_FILENAME}\smalltalk.lnk" "$INSTDIR\bin\stx.exe" |
27c3b6ef08b5
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
989
diff
changeset
|
141 |
CreateShortCut "$DESKTOP\smalltalk.lnk" "$INSTDIR\bin\stx.exe" |
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
142 |
CreateShortCut "$SMPROGRAMS\${PRODUCT_FILENAME}\Website.lnk" "$INSTDIR\${PRODUCT_FILENAME}.url" |
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
143 |
CreateShortCut "$SMPROGRAMS\${PRODUCT_FILENAME}\Uninstall.lnk" "$INSTDIR\uninst.exe" |
739 | 144 |
SectionEnd |
145 |
||
146 |
Section -Post |
|
147 |
WriteUninstaller "$INSTDIR\uninst.exe" |
|
148 |
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayName" "$(^Name)" |
|
149 |
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "UninstallString" "$INSTDIR\uninst.exe" |
|
150 |
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayVersion" "${PRODUCT_VERSION}" |
|
151 |
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "URLInfoAbout" "${PRODUCT_WEB_SITE}" |
|
152 |
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "Publisher" "${PRODUCT_PUBLISHER}" |
|
153 |
SectionEnd |
|
154 |
||
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
155 |
LangString appOpen ${LANG_GERMAN} "Mit Smalltalk/X ffnen" |
747
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
156 |
LangString appOpen ${LANG_ENGLISH} "Open with Smalltalk/X" |
739 | 157 |
|
747
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
158 |
LangString DESC_Section1 ${LANG_ENGLISH} "Program components of Smalltalk/X" |
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
159 |
LangString DESC_Section1 ${LANG_GERMAN} "Alle Programmkomponenten von Smalltalk/X" |
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
160 |
;; LangString DESC_Section2 ${LANG_ENGLISH} "Online-Documentation of Smalltalk/X" |
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
161 |
;; LangString DESC_Section2 ${LANG_GERMAN} "Online-Dokumentation zu Smalltalk/X" |
739 | 162 |
;; LangString DESC_Section3 ${LANG_ENGLISH} "Libraries and Demo Projects" |
163 |
;; LangString DESC_Section3 ${LANG_GERMAN} "Bibliotheken und Beispielprojekte" |
|
164 |
;; LangString DESC_Section4 ${LANG_ENGLISH} "Logfile Printing and Report Generation" |
|
165 |
;; LangString DESC_Section4 ${LANG_GERMAN} "Drucken und Report-Generierung aus Log-Dateien" |
|
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
166 |
;; LangString DESC_Section3 ${LANG_ENGLISH} "Sources of ST/X (Base-System)" |
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
167 |
;; LangString DESC_Section3 ${LANG_GERMAN} "Quellcode von ST/X (Basis-System)" |
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
168 |
;; LangString DESC_Section4 ${LANG_ENGLISH} "Sources of Smalltalk/X" |
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
169 |
;; LangString DESC_Section4 ${LANG_GERMAN} "Quellcode von Smalltalk/X" |
739 | 170 |
|
171 |
||
172 |
!insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN |
|
173 |
!insertmacro MUI_DESCRIPTION_TEXT ${Section1} $(DESC_Section1) |
|
174 |
;; !insertmacro MUI_DESCRIPTION_TEXT ${Section2} $(DESC_Section2) |
|
175 |
;; !insertmacro MUI_DESCRIPTION_TEXT ${Section3} $(DESC_Section3) |
|
176 |
;; !insertmacro MUI_DESCRIPTION_TEXT ${Section4} $(DESC_Section4) |
|
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
177 |
|
739 | 178 |
!insertmacro MUI_FUNCTION_DESCRIPTION_END |
179 |
||
180 |
||
181 |
||
182 |
Function un.onUninstSuccess |
|
183 |
HideWindow |
|
747
1e968f06ea86
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
739
diff
changeset
|
184 |
MessageBox MB_ICONINFORMATION|MB_OK "Smalltalk/X wurde erfolgreich deinstalliert" |
739 | 185 |
FunctionEnd |
186 |
||
187 |
Function un.onInit |
|
188 |
!insertmacro MUI_UNGETLANGUAGE |
|
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
189 |
MessageBox MB_ICONQUESTION|MB_YESNO|MB_DEFBUTTON2 "Mchten Sie Smalltalk/X und alle seine Komponenten deinstallieren?" IDYES +2 |
739 | 190 |
Abort |
191 |
FunctionEnd |
|
192 |
||
193 |
Section Uninstall |
|
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
194 |
Delete "$INSTDIR\${PRODUCT_FILENAME}.url" |
739 | 195 |
Delete "$INSTDIR\uninst.exe" |
970
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
196 |
|
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
197 |
Delete "$INSTDIR\*" |
435ff9e3dfa9
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
909
diff
changeset
|
198 |
RMDir /r "$INSTDIR" |
739 | 199 |
|
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
200 |
Delete "$SMPROGRAMS\${PRODUCT_FILENAME}\Uninstall.lnk" |
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
201 |
Delete "$SMPROGRAMS\${PRODUCT_FILENAME}\Website.lnk" |
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
202 |
Delete "$SMPROGRAMS\${PRODUCT_FILENAME}\smalltalk.lnk" |
832
318955431e2d
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
825
diff
changeset
|
203 |
Delete "$DESKTOP\smalltalk.lnk" |
739 | 204 |
|
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
205 |
RMDir "$SMPROGRAMS\${PRODUCT_FILENAME}" |
739 | 206 |
|
207 |
DeleteRegKey ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" |
|
885
c29f8ef58aac
automatically generated by browser
Claus Gittinger <cg@exept.de>
parents:
855
diff
changeset
|
208 |
DeleteRegKey HKCR "Stx.SmalltalkX.1" |
1048
41a98224a315
automatically generated by browser
Stefan Vogel <sv@exept.de>
parents:
1041
diff
changeset
|
209 |
|
739 | 210 |
|
1442
14aa87cd5d2d
Added SmalltalkStartup class
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1239
diff
changeset
|
211 |
|
739 | 212 |
SetAutoClose true |
213 |
SectionEnd |