Mercurial > pidgin.yaz
annotate gaim-installer.nsi @ 10316:5d19870d3a29
[gaim-migrate @ 11516]
Updated ICQ icon from Patrik Kullman
committer: Tailor Script <tailor@pidgin.im>
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Sat, 04 Dec 2004 20:50:23 +0000 |
parents | 08251403c871 |
children | 83736fc2ea50 |
rev | line source |
---|---|
3630 | 1 ; Installer script for win32 Gaim |
3917
29ccbc3eb9c1
[gaim-migrate @ 4076]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3910
diff
changeset
|
2 ; Herman Bloggs <hermanator12002@yahoo.com> |
3630 | 3 |
8388
c08d9b0dbd29
[gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8183
diff
changeset
|
4 ; NOTE: this .NSI script is intended for NSIS 2.0 (finale release). |
c08d9b0dbd29
[gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8183
diff
changeset
|
5 ; |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
6 |
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
7 ;-------------------------------- |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
8 ;Global Variables |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
9 Var name |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
10 Var GTK_FOLDER |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
11 Var GTK_THEME_SEL |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
12 Var LANG_IS_SET |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
13 Var ISSILENT |
9902 | 14 Var STARTUP_RUN_KEY |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
15 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
16 ;-------------------------------- |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
17 ;Configuration |
3630 | 18 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
19 ;The name var is set in .onInit |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
20 Name $name |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
21 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
22 !ifdef WITH_GTK |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
23 OutFile "gaim-${GAIM_VERSION}.exe" |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
24 !else |
5931
8b5dd7117f56
[gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5396
diff
changeset
|
25 !ifdef DEBUG |
8b5dd7117f56
[gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5396
diff
changeset
|
26 OutFile "gaim-${GAIM_VERSION}-debug.exe" |
8b5dd7117f56
[gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5396
diff
changeset
|
27 !else |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
28 OutFile "gaim-${GAIM_VERSION}-no-gtk.exe" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
29 !endif |
5931
8b5dd7117f56
[gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5396
diff
changeset
|
30 !endif |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
31 |
8180
63b771e3f2c4
[gaim-migrate @ 8897]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8179
diff
changeset
|
32 SetCompressor lzma |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
33 ShowInstDetails show |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
34 ShowUninstDetails show |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
35 SetDateSave on |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
36 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
37 ; $name and $INSTDIR are set in .onInit function.. |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
38 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
39 !include "MUI.nsh" |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
40 !include "Sections.nsh" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
41 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
42 ;-------------------------------- |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
43 ;Defines |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
44 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
45 !define GAIM_NSIS_INCLUDE_PATH ".\src\win32\nsis" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
46 !define GAIM_INSTALLER_DEPS "..\win32-dev\gaim-inst-deps" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
47 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
48 !define GAIM_REG_KEY "SOFTWARE\gaim" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
49 !define GAIM_UNINSTALL_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Gaim" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
50 !define HKLM_APP_PATHS_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\gaim.exe" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
51 !define GAIM_STARTUP_RUN_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\Run" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
52 !define GAIM_UNINST_EXE "gaim-uninst.exe" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
53 !define GAIM_REG_LANG "Installer Language" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
54 |
9890 | 55 !define GTK_VERSION "2.4.7" |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
56 !define GTK_REG_KEY "SOFTWARE\GTK\2.0" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
57 !define PERL_REG_KEY "SOFTWARE\Perl" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
58 !define PERL_DLL "perl58.dll" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
59 !define GTK_DEFAULT_INSTALL_PATH "$PROGRAMFILES\Common Files\GTK\2.0" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
60 !define GTK_RUNTIME_INSTALLER "..\gtk_installer\gtk-runtime*.exe" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
61 !define GTK_THEME_DIR "..\gtk_installer\gtk_themes" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
62 !define GTK_DEFAULT_THEME_GTKRC_DIR "share\themes\Default\gtk-2.0" |
9565
c60809a33460
[gaim-migrate @ 10404]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9561
diff
changeset
|
63 !define GTK_DEFAULT_THEME_ENGINE_DIR "lib\gtk-2.0\2.4.0\engines" |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
64 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
65 ;-------------------------------- |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
66 ;Modern UI Configuration |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
67 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
68 !define MUI_ICON ".\pixmaps\gaim-install.ico" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
69 !define MUI_UNICON ".\pixmaps\gaim-install.ico" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
70 !define MUI_WELCOMEFINISHPAGE_BITMAP ".\src\win32\nsis\gaim-intro.bmp" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
71 !define MUI_HEADERIMAGE |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
72 !define MUI_HEADERIMAGE_BITMAP ".\src\win32\nsis\gaim-header.bmp" |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
73 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
74 ; Alter License section |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
75 !define MUI_LICENSEPAGE_BUTTON $(GAIM_LICENSE_BUTTON) |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
76 !define MUI_LICENSEPAGE_TEXT_BOTTOM $(GAIM_LICENSE_BOTTOM_TEXT) |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
77 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
78 !define MUI_COMPONENTSPAGE_SMALLDESC |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
79 !define MUI_ABORTWARNING |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
80 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
81 ;Finish Page config |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
82 !define MUI_FINISHPAGE_RUN "$INSTDIR\gaim.exe" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
83 !define MUI_FINISHPAGE_RUN_NOTCHECKED |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
84 !define MUI_FINISHPAGE_LINK $(GAIM_FINISH_VISIT_WEB_SITE) |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
85 !define MUI_FINISHPAGE_LINK_LOCATION "http://gaim.sourceforge.net/win32" |
3630 | 86 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
87 ;-------------------------------- |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
88 ;Pages |
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
89 |
7600
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
90 !define MUI_PAGE_CUSTOMFUNCTION_PRE preWelcomePage |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
91 !insertmacro MUI_PAGE_WELCOME |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
92 !insertmacro MUI_PAGE_LICENSE "./COPYING" |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
93 !insertmacro MUI_PAGE_COMPONENTS |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
94 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
95 !ifdef WITH_GTK |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
96 ; GTK+ install dir page |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
97 !define MUI_PAGE_CUSTOMFUNCTION_PRE preGtkDirPage |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
98 !define MUI_PAGE_CUSTOMFUNCTION_LEAVE postGtkDirPage |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
99 !define MUI_DIRECTORYPAGE_VARIABLE $GTK_FOLDER |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
100 !insertmacro MUI_PAGE_DIRECTORY |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
101 !endif |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
102 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
103 ; Gaim install dir page |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
104 !insertmacro MUI_PAGE_DIRECTORY |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
105 |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
106 !insertmacro MUI_PAGE_INSTFILES |
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
107 !insertmacro MUI_PAGE_FINISH |
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
108 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
109 !insertmacro MUI_UNPAGE_WELCOME |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
110 !insertmacro MUI_UNPAGE_CONFIRM |
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
111 !insertmacro MUI_UNPAGE_INSTFILES |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
112 !insertmacro MUI_UNPAGE_FINISH |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
113 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
114 ;-------------------------------- |
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
115 ;Languages |
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
116 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
117 ;; English goes first because its the default. The rest are |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
118 ;; in alphabetical order (at least the strings actually displayed |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
119 ;; will be). |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
120 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
121 !insertmacro MUI_LANGUAGE "English" |
6913
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
122 |
10095
b28f9be379b3
[gaim-migrate @ 11114]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9960
diff
changeset
|
123 !insertmacro MUI_LANGUAGE "Albanian" |
6913
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
124 !insertmacro MUI_LANGUAGE "Bulgarian" |
9956
a448265e09d8
[gaim-migrate @ 10856]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9902
diff
changeset
|
125 !insertmacro MUI_LANGUAGE "Catalan" |
7626
2fb83607becf
[gaim-migrate @ 8250]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7600
diff
changeset
|
126 !insertmacro MUI_LANGUAGE "Czech" |
7924
cb400cd78961
[gaim-migrate @ 8593]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7626
diff
changeset
|
127 !insertmacro MUI_LANGUAGE "Danish" |
6913
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
128 !insertmacro MUI_LANGUAGE "SimpChinese" |
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
129 !insertmacro MUI_LANGUAGE "TradChinese" |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
130 !insertmacro MUI_LANGUAGE "German" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
131 !insertmacro MUI_LANGUAGE "Spanish" |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
132 !insertmacro MUI_LANGUAGE "French" |
8388
c08d9b0dbd29
[gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8183
diff
changeset
|
133 !insertmacro MUI_LANGUAGE "Hebrew" |
6913
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
134 !insertmacro MUI_LANGUAGE "Italian" |
8183
ab0fce369327
[gaim-migrate @ 8902]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8180
diff
changeset
|
135 !insertmacro MUI_LANGUAGE "Japanese" |
6913
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
136 !insertmacro MUI_LANGUAGE "Korean" |
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
137 !insertmacro MUI_LANGUAGE "Hungarian" |
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
138 !insertmacro MUI_LANGUAGE "Dutch" |
8567
d92a7574473c
[gaim-migrate @ 9314]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8388
diff
changeset
|
139 !insertmacro MUI_LANGUAGE "Norwegian" |
8126
b6458d4ce101
[gaim-migrate @ 8830]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8099
diff
changeset
|
140 !insertmacro MUI_LANGUAGE "Polish" |
6290
976d9ad5d77a
[gaim-migrate @ 6789]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6277
diff
changeset
|
141 !insertmacro MUI_LANGUAGE "PortugueseBR" |
7215
fa011d609c54
[gaim-migrate @ 7784]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7214
diff
changeset
|
142 !insertmacro MUI_LANGUAGE "Portuguese" |
6951
54deff9eec41
[gaim-migrate @ 7498]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6948
diff
changeset
|
143 !insertmacro MUI_LANGUAGE "Romanian" |
8099
40163e984818
[gaim-migrate @ 8799]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7924
diff
changeset
|
144 !insertmacro MUI_LANGUAGE "Russian" |
6913
44933354ecad
[gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6912
diff
changeset
|
145 !insertmacro MUI_LANGUAGE "Serbian" |
9561
3ff773e92747
[gaim-migrate @ 10397]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9139
diff
changeset
|
146 !insertmacro MUI_LANGUAGE "Slovak" |
9115
f55f93a975f2
[gaim-migrate @ 9892]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8567
diff
changeset
|
147 !insertmacro MUI_LANGUAGE "Slovenian" |
8179
3fa28787e571
[gaim-migrate @ 8896]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8178
diff
changeset
|
148 !insertmacro MUI_LANGUAGE "Finnish" |
6559
8dba07c335e9
[gaim-migrate @ 7081]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6491
diff
changeset
|
149 !insertmacro MUI_LANGUAGE "Swedish" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
150 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
151 ;-------------------------------- |
6233
0c64ba470632
[gaim-migrate @ 6726]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6159
diff
changeset
|
152 ;Translations |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
153 |
7572
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
154 !define GAIM_DEFAULT_LANGFILE "${GAIM_NSIS_INCLUDE_PATH}\translations\english.nsh" |
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
155 |
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
156 !include "${GAIM_NSIS_INCLUDE_PATH}\langmacros.nsh" |
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
157 |
10095
b28f9be379b3
[gaim-migrate @ 11114]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9960
diff
changeset
|
158 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ALBANIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\albanian.nsh" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
159 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "BULGARIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\bulgarian.nsh" |
9956
a448265e09d8
[gaim-migrate @ 10856]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9902
diff
changeset
|
160 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "CATALAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\catalan.nsh" |
7626
2fb83607becf
[gaim-migrate @ 8250]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7600
diff
changeset
|
161 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "CZECH" "${GAIM_NSIS_INCLUDE_PATH}\translations\czech.nsh" |
7924
cb400cd78961
[gaim-migrate @ 8593]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7626
diff
changeset
|
162 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "DANISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\danish.nsh" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
163 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "DUTCH" "${GAIM_NSIS_INCLUDE_PATH}\translations\dutch.nsh" |
7572
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
164 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ENGLISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\english.nsh" |
8178
33802f8a2d90
[gaim-migrate @ 8895]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8126
diff
changeset
|
165 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "FINNISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\finnish.nsh" |
7572
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
166 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "FRENCH" "${GAIM_NSIS_INCLUDE_PATH}\translations\french.nsh" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
167 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "GERMAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\german.nsh" |
8388
c08d9b0dbd29
[gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8183
diff
changeset
|
168 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "HEBREW" "${GAIM_NSIS_INCLUDE_PATH}\translations\hebrew.nsh" |
7572
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
169 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "HUNGARIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\hungarian.nsh" |
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
170 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ITALIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\italian.nsh" |
8183
ab0fce369327
[gaim-migrate @ 8902]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8180
diff
changeset
|
171 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "JAPANESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\japanese.nsh" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
172 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "KOREAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\korean.nsh" |
8567
d92a7574473c
[gaim-migrate @ 9314]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8388
diff
changeset
|
173 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "NORWEGIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\norwegian.nsh" |
8126
b6458d4ce101
[gaim-migrate @ 8830]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8099
diff
changeset
|
174 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "POLISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\polish.nsh" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
175 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "PORTUGUESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\portuguese.nsh" |
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
176 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "PORTUGUESEBR" "${GAIM_NSIS_INCLUDE_PATH}\translations\portuguese-br.nsh" |
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
177 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ROMANIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\romanian.nsh" |
8099
40163e984818
[gaim-migrate @ 8799]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7924
diff
changeset
|
178 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "RUSSIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\russian.nsh" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
179 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SERBIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\serbian-latin.nsh" |
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
180 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SIMPCHINESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\simp-chinese.nsh" |
9561
3ff773e92747
[gaim-migrate @ 10397]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9139
diff
changeset
|
181 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SLOVAK" "${GAIM_NSIS_INCLUDE_PATH}\translations\slovak.nsh" |
9115
f55f93a975f2
[gaim-migrate @ 9892]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8567
diff
changeset
|
182 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SLOVENIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\slovenian.nsh" |
7575
df5f8c339c38
[gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7572
diff
changeset
|
183 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SPANISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\spanish.nsh" |
7572
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
184 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SWEDISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\swedish.nsh" |
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
185 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "TRADCHINESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\trad-chinese.nsh" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
186 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
187 ;-------------------------------- |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
188 ;Reserve Files |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
189 ; Only need this if using bzip2 compression |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
190 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
191 !insertmacro MUI_RESERVEFILE_INSTALLOPTIONS |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
192 !insertmacro MUI_RESERVEFILE_LANGDLL |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
193 ReserveFile "${NSISDIR}\Plugins\UserInfo.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
194 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
195 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
196 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
197 ;; Start Install Sections ;; |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
198 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
3630 | 199 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
200 ;-------------------------------- |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
201 ;Uninstall any old version of Gaim |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
202 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
203 Section -SecUninstallOldGaim |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
204 ; Check install rights.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
205 Call CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
206 Pop $R0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
207 |
9902 | 208 ;If gaim is currently set to run on startup, |
209 ; save the section of the Registry where the setting is before uninstalling, | |
210 ; so we can put it back after installing the new version | |
211 ClearErrors | |
212 ReadRegStr $STARTUP_RUN_KEY HKCU "${GAIM_STARTUP_RUN_KEY}" "Gaim" | |
213 IfErrors +3 | |
214 StrCpy $STARTUP_RUN_KEY "HKCU" | |
215 Goto +4 | |
216 ReadRegStr $STARTUP_RUN_KEY HKLM "${GAIM_STARTUP_RUN_KEY}" "Gaim" | |
217 IfErrors +2 | |
218 StrCpy $STARTUP_RUN_KEY "HKLM" | |
219 | |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
220 StrCmp $R0 "HKLM" gaim_hklm |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
221 StrCmp $R0 "HKCU" gaim_hkcu done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
222 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
223 gaim_hkcu: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
224 ReadRegStr $R1 HKCU ${GAIM_REG_KEY} "" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
225 ReadRegStr $R2 HKCU ${GAIM_REG_KEY} "Version" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
226 ReadRegStr $R3 HKCU "${GAIM_UNINSTALL_KEY}" "UninstallString" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
227 Goto try_uninstall |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
228 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
229 gaim_hklm: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
230 ReadRegStr $R1 HKLM ${GAIM_REG_KEY} "" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
231 ReadRegStr $R2 HKLM ${GAIM_REG_KEY} "Version" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
232 ReadRegStr $R3 HKLM "${GAIM_UNINSTALL_KEY}" "UninstallString" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
233 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
234 ; If previous version exists .. remove |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
235 try_uninstall: |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
236 StrCmp $R1 "" done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
237 ; Version key started with 0.60a3. Prior versions can't be |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
238 ; automaticlly uninstalled. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
239 StrCmp $R2 "" uninstall_problem |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
240 ; Check if we have uninstall string.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
241 IfFileExists $R3 0 uninstall_problem |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
242 ; Have uninstall string.. go ahead and uninstall. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
243 SetOverwrite on |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
244 ; Need to copy uninstaller outside of the install dir |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
245 ClearErrors |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
246 CopyFiles /SILENT $R3 "$TEMP\${GAIM_UNINST_EXE}" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
247 SetOverwrite off |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
248 IfErrors uninstall_problem |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
249 ; Ready to uninstall.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
250 ClearErrors |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
251 ExecWait '"$TEMP\${GAIM_UNINST_EXE}" /S _?=$R1' |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
252 IfErrors exec_error |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
253 Delete "$TEMP\${GAIM_UNINST_EXE}" |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
254 Goto done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
255 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
256 exec_error: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
257 Delete "$TEMP\${GAIM_UNINST_EXE}" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
258 Goto uninstall_problem |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
259 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
260 uninstall_problem: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
261 ; In this case just wipe out previous Gaim install dir.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
262 ; We get here because versions 0.60a1 and 0.60a2 don't have versions set in the registry |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
263 ; and versions 0.60 and lower did not correctly set the uninstall reg string |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
264 ; (the string was set in quotes) |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
265 IfSilent do_wipeout |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
266 MessageBox MB_YESNO $(GAIM_PROMPT_WIPEOUT) IDYES do_wipeout IDNO cancel_install |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
267 cancel_install: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
268 Quit |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
269 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
270 do_wipeout: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
271 StrCmp $R0 "HKLM" gaim_del_lm_reg gaim_del_cu_reg |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
272 gaim_del_cu_reg: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
273 DeleteRegKey HKCU ${GAIM_REG_KEY} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
274 Goto uninstall_prob_cont |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
275 gaim_del_lm_reg: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
276 DeleteRegKey HKLM ${GAIM_REG_KEY} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
277 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
278 uninstall_prob_cont: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
279 RMDir /r "$R1" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
280 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
281 done: |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
282 SectionEnd |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
283 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
284 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
285 ;-------------------------------- |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
286 ;GTK+ Runtime Install Section |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
287 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
288 !ifdef WITH_GTK |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
289 Section $(GTK_SECTION_TITLE) SecGtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
290 SectionIn 1 RO |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
291 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
292 Call CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
293 Pop $R1 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
294 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
295 SetOutPath $TEMP |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
296 SetOverwrite on |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
297 File /oname=gtk-runtime.exe ${GTK_RUNTIME_INSTALLER} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
298 SetOverwrite off |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
299 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
300 ; This keeps track whether we install GTK+ or not.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
301 StrCpy $R5 "0" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
302 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
303 Call DoWeNeedGtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
304 Pop $R0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
305 Pop $R6 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
306 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
307 StrCmp $R0 "0" have_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
308 StrCmp $R0 "1" upgrade_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
309 StrCmp $R0 "2" no_gtk no_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
310 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
311 no_gtk: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
312 StrCmp $R1 "NONE" gtk_no_install_rights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
313 ClearErrors |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
314 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT /D=$GTK_FOLDER' |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
315 Goto gtk_install_cont |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
316 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
317 upgrade_gtk: |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
318 StrCpy $GTK_FOLDER $R6 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
319 IfSilent skip_mb |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
320 MessageBox MB_YESNO $(GTK_UPGRADE_PROMPT) IDNO done |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
321 skip_mb: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
322 ClearErrors |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
323 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT' |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
324 Goto gtk_install_cont |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
325 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
326 gtk_install_cont: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
327 IfErrors gtk_install_error |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
328 StrCpy $R5 "1" ; marker that says we installed... |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
329 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
330 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
331 gtk_install_error: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
332 Delete "$TEMP\gtk-runtime.exe" |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
333 IfSilent skip_mb1 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
334 MessageBox MB_OK $(GTK_INSTALL_ERROR) IDOK |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
335 skip_mb1: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
336 Quit |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
337 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
338 have_gtk: |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
339 StrCpy $GTK_FOLDER $R6 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
340 StrCmp $R1 "NONE" done ; If we have no rights.. can't re-install.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
341 ; Even if we have a sufficient version of GTK+, we give user choice to re-install. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
342 ClearErrors |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
343 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT' |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
344 IfErrors gtk_install_error |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
345 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
346 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
347 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
348 ; end got_install rights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
349 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
350 gtk_no_install_rights: |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
351 ; Install GTK+ to Gaim install dir |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
352 StrCpy $GTK_FOLDER $INSTDIR |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
353 ClearErrors |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
354 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT /D=$GTK_FOLDER' |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
355 IfErrors gtk_install_error |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
356 SetOverwrite on |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
357 ClearErrors |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
358 CopyFiles /FILESONLY "$GTK_FOLDER\bin\*.dll" $GTK_FOLDER |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
359 SetOverwrite off |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
360 IfErrors gtk_install_error |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
361 Delete "$GTK_FOLDER\bin\*.dll" |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
362 Goto done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
363 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
364 ; end gtk_no_install_rights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
365 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
366 done: |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
367 Delete "$TEMP\gtk-runtime.exe" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
368 SectionEnd ; end of GTK+ section |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
369 !endif |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
370 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
371 ;-------------------------------- |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
372 ;Gaim Install Section |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
373 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
374 Section $(GAIM_SECTION_TITLE) SecGaim |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
375 SectionIn 1 RO |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
376 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
377 ; Check install rights.. |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
378 Call CheckUserInstallRights |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
379 Pop $R0 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
380 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
381 ; Get GTK+ lib dir if we have it.. |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
382 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
383 StrCmp $R0 "NONE" gaim_none |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
384 StrCmp $R0 "HKLM" gaim_hklm gaim_hkcu |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
385 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
386 gaim_hklm: |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
387 ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path" |
6816
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
388 WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "" "$INSTDIR\gaim.exe" |
6422
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
389 WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "Path" "$R1\bin" |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
390 WriteRegStr HKLM ${GAIM_REG_KEY} "" "$INSTDIR" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
391 WriteRegStr HKLM ${GAIM_REG_KEY} "Version" "${GAIM_VERSION}" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
392 WriteRegStr HKLM "${GAIM_UNINSTALL_KEY}" "DisplayName" $(GAIM_UNINSTALL_DESC) |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
393 WriteRegStr HKLM "${GAIM_UNINSTALL_KEY}" "UninstallString" "$INSTDIR\${GAIM_UNINST_EXE}" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
394 ; Sets scope of the desktop and Start Menu entries for all users. |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
395 SetShellVarContext "all" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
396 Goto gaim_install_files |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
397 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
398 gaim_hkcu: |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
399 ReadRegStr $R1 HKCU ${GTK_REG_KEY} "Path" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
400 StrCmp $R1 "" 0 gaim_hkcu1 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
401 ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
402 gaim_hkcu1: |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
403 WriteRegStr HKCU ${GAIM_REG_KEY} "" "$INSTDIR" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
404 WriteRegStr HKCU ${GAIM_REG_KEY} "Version" "${GAIM_VERSION}" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
405 WriteRegStr HKCU "${GAIM_UNINSTALL_KEY}" "DisplayName" $(GAIM_UNINSTALL_DESC) |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
406 WriteRegStr HKCU "${GAIM_UNINSTALL_KEY}" "UninstallString" "$INSTDIR\${GAIM_UNINST_EXE}" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
407 Goto gaim_install_files |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
408 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
409 gaim_none: |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
410 ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
411 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
412 gaim_install_files: |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
413 SetOutPath "$INSTDIR" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
414 ; Gaim files |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
415 SetOverwrite on |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
416 File /r .\win32-install-dir\*.* |
5931
8b5dd7117f56
[gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5396
diff
changeset
|
417 !ifdef DEBUG |
6854
9e1bd25afa88
[gaim-migrate @ 7399]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6848
diff
changeset
|
418 File "${GAIM_INSTALLER_DEPS}\exchndl.dll" |
5931
8b5dd7117f56
[gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5396
diff
changeset
|
419 !endif |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
420 |
6848
060aa79a733e
[gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
421 ; Install shfolder.dll if need be.. |
060aa79a733e
[gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
422 SearchPath $R4 "shfolder.dll" |
060aa79a733e
[gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
423 StrCmp $R4 "" 0 got_shfolder |
060aa79a733e
[gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
424 SetOutPath "$SYSDIR" |
6854
9e1bd25afa88
[gaim-migrate @ 7399]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6848
diff
changeset
|
425 File "${GAIM_INSTALLER_DEPS}\shfolder.dll" |
6848
060aa79a733e
[gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
426 SetOutPath "$INSTDIR" |
060aa79a733e
[gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
427 got_shfolder: |
060aa79a733e
[gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
428 |
6816
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
429 ; Check if Perl is installed, If not remove perl plugin |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
430 ReadRegStr $R2 HKLM ${PERL_REG_KEY} "" |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
431 StrCmp $R2 "" 0 perl_exists |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
432 ReadRegStr $R2 HKCU ${PERL_REG_KEY} "" |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
433 StrCmp $R2 "" perl_remove perl_exists |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
434 |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
435 perl_remove: |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
436 Delete "$INSTDIR\plugins\perl.dll" |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
437 RMDir /r "$INSTDIR\perlmod" |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
438 Goto perl_done |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
439 |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
440 perl_exists: |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
441 IfFileExists "$R2\bin\${PERL_DLL}" 0 perl_remove |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
442 StrCmp $R0 "HKLM" 0 perl_done |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
443 ReadRegStr $R3 HKLM "${HKLM_APP_PATHS_KEY}" "Path" |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
444 WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "Path" "$R3;$R2\bin" |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
445 |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
446 perl_done: |
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6650
diff
changeset
|
447 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
448 CreateDirectory "$SMPROGRAMS\Gaim" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
449 CreateShortCut "$SMPROGRAMS\Gaim\Gaim.lnk" "$INSTDIR\gaim.exe" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
450 CreateShortCut "$DESKTOP\Gaim.lnk" "$INSTDIR\gaim.exe" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
451 SetOutPath "$INSTDIR" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
452 |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
453 ; If we don't have install rights.. we're done |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
454 StrCmp $R0 "NONE" done |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
455 CreateShortCut "$SMPROGRAMS\Gaim\Uninstall.lnk" "$INSTDIR\${GAIM_UNINST_EXE}" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
456 SetOverwrite off |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
457 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
458 ; Write out installer language |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
459 WriteRegStr HKCU "${GAIM_REG_KEY}" "${GAIM_REG_LANG}" "$LANGUAGE" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
460 |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
461 ; write out uninstaller |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
462 SetOverwrite on |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
463 WriteUninstaller "$INSTDIR\${GAIM_UNINST_EXE}" |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
464 SetOverwrite off |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
465 |
9902 | 466 ; If we previously had gaim setup to run on startup, make it do so again |
467 StrCmp $STARTUP_RUN_KEY "HKCU" +1 +2 | |
468 WriteRegStr HKCU "${GAIM_STARTUP_RUN_KEY}" "Gaim" "$INSTDIR\gaim.exe" | |
469 StrCmp $STARTUP_RUN_KEY "HKLM" +1 +2 | |
470 WriteRegStr HKLM "${GAIM_STARTUP_RUN_KEY}" "Gaim" "$INSTDIR\gaim.exe" | |
471 | |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
472 done: |
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
473 SectionEnd ; end of default Gaim section |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
474 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
475 ;-------------------------------- |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
476 ;GTK+ Themes |
3860
d0897828bd0d
[gaim-migrate @ 4012]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3853
diff
changeset
|
477 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
478 SubSection /e $(GTK_THEMES_SECTION_TITLE) SecGtkThemes |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
479 Section /o $(GTK_NOTHEME_SECTION_TITLE) SecGtkNone |
6948
8168bc284cfb
[gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6913
diff
changeset
|
480 Call CanWeInstallATheme |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
481 Pop $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
482 StrCmp $R0 "" done |
6948
8168bc284cfb
[gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6913
diff
changeset
|
483 SetOverwrite on |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
484 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
485 CopyFiles $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.plain $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc |
6948
8168bc284cfb
[gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6913
diff
changeset
|
486 SetOverwrite off |
8168bc284cfb
[gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6913
diff
changeset
|
487 done: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
488 SectionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
489 |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
490 Section $(GTK_WIMP_SECTION_TITLE) SecGtkWimp |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
491 Call CanWeInstallATheme |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
492 Pop $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
493 StrCmp $R0 "" done |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
494 SetOverwrite on |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
495 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
496 SetOutPath $R0\${GTK_DEFAULT_THEME_ENGINE_DIR} |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
497 File ${GTK_THEME_DIR}\engines\libwimp.dll |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
498 SetOutPath $R0\${GTK_DEFAULT_THEME_GTKRC_DIR} |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
499 File ${GTK_THEME_DIR}\themes\gtkrc.gtkwimp |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
500 File /oname=gtkrc ${GTK_THEME_DIR}\themes\gtkrc.gtkwimp |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
501 SetOverwrite off |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
502 done: |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
503 SectionEnd |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
504 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
505 Section /o $(GTK_BLUECURVE_SECTION_TITLE) SecGtkBluecurve |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
506 Call CanWeInstallATheme |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
507 Pop $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
508 StrCmp $R0 "" done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
509 SetOverwrite on |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
510 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
511 SetOutPath $R0\${GTK_DEFAULT_THEME_ENGINE_DIR} |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
512 File ${GTK_THEME_DIR}\engines\libbluecurve.dll |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
513 SetOutPath $R0\${GTK_DEFAULT_THEME_GTKRC_DIR} |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
514 File ${GTK_THEME_DIR}\themes\gtkrc.bluecurve |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
515 File /oname=gtkrc ${GTK_THEME_DIR}\themes\gtkrc.bluecurve |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
516 SetOverwrite off |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
517 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
518 SectionEnd |
3860
d0897828bd0d
[gaim-migrate @ 4012]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3853
diff
changeset
|
519 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
520 Section /o $(GTK_LIGHTHOUSEBLUE_SECTION_TITLE) SecGtkLighthouseblue |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
521 Call CanWeInstallATheme |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
522 Pop $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
523 StrCmp $R0 "" done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
524 SetOverwrite on |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
525 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
526 SetOutPath $R0\${GTK_DEFAULT_THEME_ENGINE_DIR} |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
527 File ${GTK_THEME_DIR}\engines\liblighthouseblue.dll |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
528 SetOutPath $R0\${GTK_DEFAULT_THEME_GTKRC_DIR} |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
529 File ${GTK_THEME_DIR}\themes\gtkrc.lighthouseblue |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
530 File /oname=gtkrc ${GTK_THEME_DIR}\themes\gtkrc.lighthouseblue |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
531 SetOverwrite off |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
532 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
533 SectionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
534 SubSectionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
535 |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
536 ;-------------------------------- |
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
537 ;Uninstaller Section |
3630 | 538 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
539 |
3630 | 540 Section Uninstall |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
541 Call un.CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
542 Pop $R0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
543 StrCmp $R0 "NONE" no_rights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
544 StrCmp $R0 "HKCU" try_hkcu try_hklm |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
545 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
546 try_hkcu: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
547 ReadRegStr $R0 HKCU ${GAIM_REG_KEY} "" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
548 StrCmp $R0 $INSTDIR 0 cant_uninstall |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
549 ; HKCU install path matches our INSTDIR.. so uninstall |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
550 DeleteRegKey HKCU ${GAIM_REG_KEY} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
551 DeleteRegKey HKCU "${GAIM_UNINSTALL_KEY}" |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
552 Goto cont_uninstall |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
553 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
554 try_hklm: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
555 ReadRegStr $R0 HKLM ${GAIM_REG_KEY} "" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
556 StrCmp $R0 $INSTDIR 0 try_hkcu |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
557 ; HKLM install path matches our INSTDIR.. so uninstall |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
558 DeleteRegKey HKLM ${GAIM_REG_KEY} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
559 DeleteRegKey HKLM "${GAIM_UNINSTALL_KEY}" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
560 DeleteRegKey HKLM "${HKLM_APP_PATHS_KEY}" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
561 ; Sets start menu and desktop scope to all users.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
562 SetShellVarContext "all" |
4126
e8f2fdf78662
[gaim-migrate @ 4343]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3989
diff
changeset
|
563 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
564 cont_uninstall: |
6090
44930abebe0d
[gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5931
diff
changeset
|
565 ; The WinPrefs plugin may have left this behind.. |
44930abebe0d
[gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5931
diff
changeset
|
566 DeleteRegValue HKCU "${GAIM_STARTUP_RUN_KEY}" "Gaim" |
44930abebe0d
[gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5931
diff
changeset
|
567 DeleteRegValue HKLM "${GAIM_STARTUP_RUN_KEY}" "Gaim" |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
568 ; Remove Language preference info |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
569 DeleteRegKey HKCU ${GAIM_REG_KEY} ;${MUI_LANGDLL_REGISTRY_ROOT} ${MUI_LANGDLL_REGISTRY_KEY} |
6090
44930abebe0d
[gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5931
diff
changeset
|
570 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
571 RMDir /r "$INSTDIR\locale" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
572 RMDir /r "$INSTDIR\pixmaps" |
6973 | 573 RMDir /r "$INSTDIR\perlmod" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
574 Delete "$INSTDIR\plugins\autorecon.dll" |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
575 Delete "$INSTDIR\plugins\docklet.dll" |
9565
c60809a33460
[gaim-migrate @ 10404]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9561
diff
changeset
|
576 Delete "$INSTDIR\plugins\extplacement.dll" |
6476
1325c207d159
[gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6447
diff
changeset
|
577 Delete "$INSTDIR\plugins\history.dll" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
578 Delete "$INSTDIR\plugins\iconaway.dll" |
6476
1325c207d159
[gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6447
diff
changeset
|
579 Delete "$INSTDIR\plugins\idle.dll" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
580 Delete "$INSTDIR\plugins\libgg.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
581 Delete "$INSTDIR\plugins\libirc.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
582 Delete "$INSTDIR\plugins\libjabber.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
583 Delete "$INSTDIR\plugins\libmsn.dll" |
9570
24f84b7ffe8e
[gaim-migrate @ 10413]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9565
diff
changeset
|
584 Delete "$INSTDIR\plugins\libnapster.dll" |
9139
89a1cfea74e5
[gaim-migrate @ 9923]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9115
diff
changeset
|
585 Delete "$INSTDIR\plugins\libnovell.dll" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
586 Delete "$INSTDIR\plugins\liboscar.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
587 Delete "$INSTDIR\plugins\libtoc.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
588 Delete "$INSTDIR\plugins\libyahoo.dll" |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
589 Delete "$INSTDIR\plugins\perl.dll" |
7600
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
590 Delete "$INSTDIR\plugins\relnot.dll" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
591 Delete "$INSTDIR\plugins\spellchk.dll" |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
592 Delete "$INSTDIR\plugins\ssl-nss.dll" |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
593 Delete "$INSTDIR\plugins\ssl.dll" |
6476
1325c207d159
[gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6447
diff
changeset
|
594 Delete "$INSTDIR\plugins\statenotify.dll" |
8099
40163e984818
[gaim-migrate @ 8799]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7924
diff
changeset
|
595 Delete "$INSTDIR\plugins\tcl.dll" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
596 Delete "$INSTDIR\plugins\ticker.dll" |
6476
1325c207d159
[gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6447
diff
changeset
|
597 Delete "$INSTDIR\plugins\timestamp.dll" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
598 Delete "$INSTDIR\plugins\win2ktrans.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
599 Delete "$INSTDIR\plugins\winprefs.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
600 RMDir "$INSTDIR\plugins" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
601 Delete "$INSTDIR\sounds\gaim\arrive.wav" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
602 Delete "$INSTDIR\sounds\gaim\leave.wav" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
603 Delete "$INSTDIR\sounds\gaim\receive.wav" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
604 Delete "$INSTDIR\sounds\gaim\redalert.wav" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
605 Delete "$INSTDIR\sounds\gaim\send.wav" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
606 RMDir "$INSTDIR\sounds\gaim" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
607 RMDir "$INSTDIR\sounds" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
608 Delete "$INSTDIR\gaim.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
609 Delete "$INSTDIR\gaim.exe" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
610 Delete "$INSTDIR\idletrack.dll" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
611 Delete "$INSTDIR\libgtkspell.dll" |
6973 | 612 Delete "$INSTDIR\nspr4.dll" |
613 Delete "$INSTDIR\nss3.dll" | |
614 Delete "$INSTDIR\nssckbi.dll" | |
615 Delete "$INSTDIR\plc4.dll" | |
616 Delete "$INSTDIR\plds4.dll" | |
617 Delete "$INSTDIR\softokn3.dll" | |
618 Delete "$INSTDIR\ssl3.dll" | |
619 Delete "$INSTDIR\${GAIM_UNINST_EXE}" | |
620 !ifdef DEBUG | |
621 Delete "$INSTDIR\exchndl.dll" | |
622 !endif | |
623 | |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
624 ;Try to remove Gaim install dir .. if empty |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
625 RMDir "$INSTDIR" |
3853
eddcb3a8c74e
[gaim-migrate @ 4005]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3849
diff
changeset
|
626 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
627 ; Shortcuts.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
628 RMDir /r "$SMPROGRAMS\Gaim" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
629 Delete "$DESKTOP\Gaim.lnk" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
630 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
631 Goto done |
4897
65a0a360e8c4
[gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4857
diff
changeset
|
632 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
633 cant_uninstall: |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
634 IfSilent skip_mb |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
635 MessageBox MB_OK $(un.GAIM_UNINSTALL_ERROR_1) IDOK |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
636 skip_mb: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
637 Quit |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
638 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
639 no_rights: |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
640 IfSilent skip_mb1 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
641 MessageBox MB_OK $(un.GAIM_UNINSTALL_ERROR_2) IDOK |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
642 skip_mb1: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
643 Quit |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
644 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
645 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
646 SectionEnd ; end of uninstall section |
3853
eddcb3a8c74e
[gaim-migrate @ 4005]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3849
diff
changeset
|
647 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
648 ;-------------------------------- |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
649 ;Descriptions |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
650 !insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
651 !insertmacro MUI_DESCRIPTION_TEXT ${SecGaim} \ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
652 $(GAIM_SECTION_DESCRIPTION) |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
653 !ifdef WITH_GTK |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
654 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtk} \ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
655 $(GTK_SECTION_DESCRIPTION) |
5383
e44333671363
[gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5332
diff
changeset
|
656 !endif |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
657 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkThemes} \ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
658 $(GTK_THEMES_SECTION_DESCRIPTION) |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
659 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkNone} \ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
660 $(GTK_NO_THEME_DESC) |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
661 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkWimp} \ |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
662 $(GTK_WIMP_THEME_DESC) |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
663 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkBluecurve} \ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
664 $(GTK_BLUECURVE_THEME_DESC) |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
665 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkLighthouseblue} \ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
666 $(GTK_LIGHTHOUSEBLUE_THEME_DESC) |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
667 !insertmacro MUI_FUNCTION_DESCRIPTION_END |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
668 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
669 ;-------------------------------- |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
670 ;Functions |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
671 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
672 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
673 ; Usage: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
674 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
675 ; Call CanWeInstallATheme |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
676 ; Pop $R0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
677 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
678 ; Return: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
679 ; "" - If no |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
680 ; "root path of GTK+ installation" - if yes |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
681 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
682 Function CanWeInstallATheme |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
683 Push $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
684 Push $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
685 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
686 ; Set default.. no rights |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
687 StrCpy $1 "" |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
688 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
689 Call CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
690 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
691 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
692 ; If no rights check if gtk was installed to gaim dir.. |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
693 StrCmp $0 "NONE" 0 themes_cont |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
694 StrCmp $GTK_FOLDER $INSTDIR 0 no_rights |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
695 StrCpy $1 $INSTDIR |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
696 Goto done |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
697 themes_cont: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
698 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
699 StrCmp $0 "HKCU" hkcu hklm |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
700 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
701 hkcu: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
702 ReadRegStr $1 HKCU ${GTK_REG_KEY} "Path" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
703 StrCmp $1 "" no_rights done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
704 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
705 hklm: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
706 ReadRegStr $1 HKLM ${GTK_REG_KEY} "Path" |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
707 Goto done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
708 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
709 no_rights: |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
710 IfSilent skip_mb |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
711 MessageBox MB_OK $(GTK_NO_THEME_INSTALL_RIGHTS) IDOK |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
712 skip_mb: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
713 StrCpy $1 "" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
714 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
715 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
716 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
717 Exch $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
718 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
719 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
720 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
721 Function CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
722 ClearErrors |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
723 UserInfo::GetName |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
724 IfErrors Win9x |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
725 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
726 UserInfo::GetAccountType |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
727 Pop $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
728 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
729 StrCmp $1 "Admin" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
730 StrCpy $1 "HKLM" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
731 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
732 StrCmp $1 "Power" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
733 StrCpy $1 "HKLM" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
734 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
735 StrCmp $1 "User" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
736 StrCpy $1 "HKCU" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
737 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
738 StrCmp $1 "Guest" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
739 StrCpy $1 "NONE" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
740 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
741 ; Unknown error |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
742 StrCpy $1 "NONE" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
743 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
744 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
745 Win9x: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
746 StrCpy $1 "HKLM" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
747 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
748 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
749 Push $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
750 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
751 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
752 Function un.CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
753 ClearErrors |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
754 UserInfo::GetName |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
755 IfErrors Win9x |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
756 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
757 UserInfo::GetAccountType |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
758 Pop $1 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
759 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
760 StrCmp $1 "Admin" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
761 StrCpy $1 "HKLM" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
762 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
763 StrCmp $1 "Power" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
764 StrCpy $1 "HKLM" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
765 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
766 StrCmp $1 "User" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
767 StrCpy $1 "HKCU" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
768 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
769 StrCmp $1 "Guest" 0 +3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
770 StrCpy $1 "NONE" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
771 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
772 ; Unknown error |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
773 StrCpy $1 "NONE" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
774 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
775 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
776 Win9x: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
777 StrCpy $1 "HKLM" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
778 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
779 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
780 Push $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
781 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
782 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
783 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
784 ; Usage: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
785 ; Push $0 ; Path string |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
786 ; Call VerifyDir |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
787 ; Pop $0 ; 0 - Bad path 1 - Good path |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
788 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
789 Function VerifyDir |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
790 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
791 Loop: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
792 IfFileExists $0 dir_exists |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
793 StrCpy $1 $0 ; save last |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
794 Push $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
795 Call GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
796 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
797 StrLen $2 $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
798 ; IfFileExists "C:" on xp returns true and on win2k returns false |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
799 ; So we're done in such a case.. |
9960 | 800 IntCmp $2 2 loop_done |
801 ; GetParent of "C:" returns "" | |
802 IntCmp $2 0 loop_done | |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
803 Goto Loop |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
804 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
805 loop_done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
806 StrCpy $1 "$0\GaImFooB" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
807 ; Check if we can create dir on this drive.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
808 ClearErrors |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
809 CreateDirectory $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
810 IfErrors DirBad DirGood |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
811 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
812 dir_exists: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
813 ClearErrors |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
814 FileOpen $1 "$0\gaimfoo.bar" w |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
815 IfErrors PathBad PathGood |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
816 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
817 DirGood: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
818 RMDir $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
819 Goto PathGood1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
820 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
821 DirBad: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
822 RMDir $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
823 Goto PathBad1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
824 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
825 PathBad: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
826 FileClose $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
827 Delete "$0\gaimfoo.bar" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
828 PathBad1: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
829 StrCpy $0 "0" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
830 Push $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
831 Return |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
832 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
833 PathGood: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
834 FileClose $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
835 Delete "$0\gaimfoo.bar" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
836 PathGood1: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
837 StrCpy $0 "1" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
838 Push $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
839 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
840 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
841 Function .onVerifyInstDir |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
842 Push $INSTDIR |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
843 Call VerifyDir |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
844 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
845 StrCmp $0 "0" 0 dir_good |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
846 Abort |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
847 dir_good: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
848 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
849 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
850 ; GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
851 ; input, top of stack (e.g. C:\Program Files\Poop) |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
852 ; output, top of stack (replaces, with e.g. C:\Program Files) |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
853 ; modifies no other variables. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
854 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
855 ; Usage: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
856 ; Push "C:\Program Files\Directory\Whatever" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
857 ; Call GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
858 ; Pop $R0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
859 ; ; at this point $R0 will equal "C:\Program Files\Directory" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
860 Function GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
861 Exch $0 ; old $0 is on top of stack |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
862 Push $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
863 Push $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
864 StrCpy $1 -1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
865 loop: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
866 StrCpy $2 $0 1 $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
867 StrCmp $2 "" exit |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
868 StrCmp $2 "\" exit |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
869 IntOp $1 $1 - 1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
870 Goto loop |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
871 exit: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
872 StrCpy $0 $0 $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
873 Pop $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
874 Pop $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
875 Exch $0 ; put $0 on top of stack, restore $0 to original value |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
876 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
877 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
878 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
879 ; CheckGtkVersion |
9565
c60809a33460
[gaim-migrate @ 10404]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9561
diff
changeset
|
880 ; inputs: Push 2 GTK+ version strings to check. The major value needs to |
c60809a33460
[gaim-migrate @ 10404]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9561
diff
changeset
|
881 ; be equal and the minor value needs to be greater or equal. |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
882 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
883 ; Usage: |
9565
c60809a33460
[gaim-migrate @ 10404]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9561
diff
changeset
|
884 ; Push "2.1.0" ; Refrence version |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
885 ; Push "2.2.1" ; Version to check |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
886 ; Call CheckGtkVersion |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
887 ; Pop $R0 |
9565
c60809a33460
[gaim-migrate @ 10404]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9561
diff
changeset
|
888 ; $R0 will now equal "1", because 2.2 is greater than 2.1 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
889 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
890 Function CheckGtkVersion |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
891 ; Version we want to check |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
892 Pop $6 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
893 ; Reference version |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
894 Pop $8 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
895 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
896 ; Check that the string to check is at least 5 chars long (i.e. x.x.x) |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
897 StrLen $7 $6 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
898 IntCmp $7 5 0 bad_version |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
899 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
900 ; Major version check |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
901 StrCpy $7 $6 1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
902 StrCpy $9 $8 1 |
9565
c60809a33460
[gaim-migrate @ 10404]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
9561
diff
changeset
|
903 IntCmp $7 $9 check_minor bad_version bad_version |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
904 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
905 check_minor: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
906 StrCpy $7 $6 1 2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
907 StrCpy $9 $8 1 2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
908 IntCmp $7 $9 good_version bad_version good_version |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
909 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
910 bad_version: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
911 StrCpy $6 "0" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
912 Push $6 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
913 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
914 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
915 good_version: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
916 StrCpy $6 "1" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
917 Push $6 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
918 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
919 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
920 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
921 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
922 ; Usage: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
923 ; Call DoWeNeedGtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
924 ; First Pop: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
925 ; 0 - We have the correct version |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
926 ; Second Pop: Key where Version was found |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
927 ; 1 - We have an old version that needs to be upgraded |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
928 ; Second Pop: HKLM or HKCU depending on where GTK was found. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
929 ; 2 - We don't have Gtk+ at all |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
930 ; Second Pop: "NONE, HKLM or HKCU" depending on our rights.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
931 ; |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
932 Function DoWeNeedGtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
933 ; Logic should be: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
934 ; - Check what user rights we have (HKLM or HKCU) |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
935 ; - If HKLM rights.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
936 ; - Only check HKLM key for GTK+ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
937 ; - If installed to HKLM, check it and return. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
938 ; - If HKCU rights.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
939 ; - First check HKCU key for GTK+ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
940 ; - if good or bad exists stop and ret. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
941 ; - If no hkcu gtk+ install, check HKLM |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
942 ; - If HKLM ver exists but old, return as if no ver exits. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
943 ; - If no rights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
944 ; - Check HKLM |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
945 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
946 Call CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
947 Pop $3 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
948 StrCmp $3 "HKLM" check_hklm |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
949 StrCmp $3 "HKCU" check_hkcu check_hklm |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
950 check_hkcu: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
951 ReadRegStr $0 HKCU ${GTK_REG_KEY} "Version" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
952 StrCpy $5 "HKCU" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
953 StrCmp $0 "" check_hklm have_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
954 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
955 check_hklm: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
956 ReadRegStr $0 HKLM ${GTK_REG_KEY} "Version" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
957 StrCpy $5 "HKLM" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
958 StrCmp $0 "" no_gtk have_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
959 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
960 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
961 have_gtk: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
962 ; GTK+ is already installed.. check version. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
963 StrCpy $1 ${GTK_VERSION} ; Minimum GTK+ version needed |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
964 Push $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
965 Push $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
966 Call CheckGtkVersion |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
967 Pop $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
968 StrCmp $2 "1" good_version bad_version |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
969 bad_version: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
970 ; Bad version. If hklm ver and we have hkcu or no rights.. return no gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
971 StrCmp $3 "NONE" no_gtk ; if no rights.. can't upgrade |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
972 StrCmp $3 "HKCU" 0 upgrade_gtk ; if HKLM can upgrade.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
973 StrCmp $5 "HKLM" no_gtk upgrade_gtk ; have hkcu rights.. if found hklm ver can't upgrade.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
974 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
975 upgrade_gtk: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
976 StrCpy $2 "1" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
977 Push $5 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
978 Push $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
979 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
980 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
981 good_version: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
982 StrCmp $5 "HKLM" have_hklm_gtk have_hkcu_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
983 have_hkcu_gtk: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
984 ; Have HKCU version |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
985 ReadRegStr $4 HKCU ${GTK_REG_KEY} "Path" |
6422
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
986 Goto good_version_cont |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
987 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
988 have_hklm_gtk: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
989 ReadRegStr $4 HKLM ${GTK_REG_KEY} "Path" |
6422
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
990 Goto good_version_cont |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
991 |
6422
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
992 good_version_cont: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
993 StrCpy $2 "0" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
994 Push $4 ; The path to existing GTK+ |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
995 Push $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
996 Goto done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
997 |
6422
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
998 no_gtk: |
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
999 StrCpy $2 "2" |
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
1000 Push $3 ; our rights |
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
1001 Push $2 |
468bbb5fbc29
[gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6300
diff
changeset
|
1002 Goto done |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1003 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1004 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1005 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1006 |
10212
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1007 Function RunCheck |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1008 System::Call 'kernel32::OpenMutex(i 2031617, b 0, t "gaim_is_running") i .R0' |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1009 IntCmp $R0 0 done |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1010 MessageBox MB_OK|MB_ICONEXCLAMATION $(GAIM_IS_RUNNING) IDOK |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1011 Abort |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1012 done: |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1013 FunctionEnd |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1014 |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1015 Function un.RunCheck |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1016 System::Call 'kernel32::OpenMutex(i 2031617, b 0, t "gaim_is_running") i .R0' |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1017 IntCmp $R0 0 done |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1018 MessageBox MB_OK|MB_ICONEXCLAMATION $(GAIM_IS_RUNNING) IDOK |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1019 Abort |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1020 done: |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1021 FunctionEnd |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1022 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1023 Function .onInit |
10212
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1024 System::Call 'kernel32::CreateMutexA(i 0, i 0, t "gaim_installer_running") i .r1 ?e' |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1025 Pop $R0 |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1026 StrCmp $R0 0 +3 |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1027 MessageBox MB_OK|MB_ICONEXCLAMATION $(INSTALLER_IS_RUNNING) |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1028 Abort |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1029 Call RunCheck |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1030 StrCpy $name "Gaim ${GAIM_VERSION}" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1031 StrCpy $GTK_THEME_SEL ${SecGtkWimp} |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1032 StrCpy $ISSILENT "/NOUI" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1033 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1034 ; GTK installer has two silent states.. one with Message boxes, one without |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1035 ; If gaim installer was run silently, we want to supress gtk installer msg boxes. |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1036 IfSilent 0 set_gtk_normal |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1037 StrCpy $ISSILENT "/S" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1038 set_gtk_normal: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1039 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1040 Call ParseParameters |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1041 |
7600
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1042 ; Select Language |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1043 IntCmp $LANG_IS_SET 1 skip_lang |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1044 ; Display Language selection dialog |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1045 !insertmacro MUI_LANGDLL_DISPLAY |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1046 skip_lang: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1047 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1048 ; If install path was set on the command, use it. |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1049 StrCmp $INSTDIR "" 0 instdir_done |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1050 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1051 Call CheckUserInstallRights |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1052 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1053 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1054 StrCmp $0 "HKLM" 0 user_dir |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1055 StrCpy $INSTDIR "$PROGRAMFILES\Gaim" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1056 Goto instdir_done |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1057 user_dir: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1058 StrCpy $2 "$SMPROGRAMS" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1059 Push $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1060 Call GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1061 Call GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1062 Pop $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1063 StrCpy $INSTDIR "$2\Gaim" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1064 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1065 instdir_done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1066 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1067 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1068 |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
1069 Function un.onInit |
10212
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1070 Call un.RunCheck |
10137 | 1071 StrCpy $name "Gaim ${GAIM_VERSION}" |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
1072 |
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
1073 ; Get stored language prefrence |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1074 ReadRegStr $LANGUAGE HKCU ${GAIM_REG_KEY} "${GAIM_REG_LANG}" |
6255
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
1075 |
386d65dd7f0d
[gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6233
diff
changeset
|
1076 FunctionEnd |
6233
0c64ba470632
[gaim-migrate @ 6726]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6159
diff
changeset
|
1077 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1078 Function .onSelChange |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1079 Push $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1080 Push $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1081 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1082 StrCpy $2 ${SF_SELECTED} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1083 SectionGetFlags ${SecGtkNone} $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1084 IntOp $2 $2 & $0 |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
1085 SectionGetFlags ${SecGtkWimp} $0 |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
1086 IntOp $2 $2 & $0 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1087 SectionGetFlags ${SecGtkBluecurve} $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1088 IntOp $2 $2 & $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1089 SectionGetFlags ${SecGtkLighthouseblue} $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1090 IntOp $2 $2 & $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1091 StrCmp $2 0 skip |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1092 SectionSetFlags ${SecGtkNone} 0 |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
1093 SectionSetFlags ${SecGtkWimp} 0 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1094 SectionSetFlags ${SecGtkBluecurve} 0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1095 SectionSetFlags ${SecGtkLighthouseblue} 0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1096 skip: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1097 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1098 !insertmacro UnselectSection $GTK_THEME_SEL |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1099 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1100 ; Remember old selection |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1101 StrCpy $2 $GTK_THEME_SEL |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1102 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1103 ; Now go through and see who is checked.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1104 SectionGetFlags ${SecGtkNone} $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1105 IntOp $0 $0 & ${SF_SELECTED} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1106 IntCmp $0 ${SF_SELECTED} 0 +2 +2 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1107 StrCpy $GTK_THEME_SEL ${SecGtkNone} |
7352
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
1108 SectionGetFlags ${SecGtkWimp} $0 |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
1109 IntOp $0 $0 & ${SF_SELECTED} |
af0e0b4d0c32
[gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7215
diff
changeset
|
1110 IntCmp $0 ${SF_SELECTED} 0 +2 +2 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1111 StrCpy $GTK_THEME_SEL ${SecGtkWimp} |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1112 SectionGetFlags ${SecGtkBluecurve} $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1113 IntOp $0 $0 & ${SF_SELECTED} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1114 IntCmp $0 ${SF_SELECTED} 0 +2 +2 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1115 StrCpy $GTK_THEME_SEL ${SecGtkBluecurve} |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1116 SectionGetFlags ${SecGtkLighthouseblue} $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1117 IntOp $0 $0 & ${SF_SELECTED} |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1118 IntCmp $0 ${SF_SELECTED} 0 +2 +2 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1119 StrCpy $GTK_THEME_SEL ${SecGtkLighthouseblue} |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1120 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1121 StrCmp $2 $GTK_THEME_SEL 0 +2 ; selection hasn't changed |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1122 !insertmacro SelectSection $GTK_THEME_SEL |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1123 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1124 Pop $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1125 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1126 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1127 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1128 ; Page enter and exit functions.. |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1129 |
7600
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1130 Function preWelcomePage |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1131 ; If this installer dosn't have GTK, check whether we need it. |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1132 ; We do this here an not in .onInit because language change in |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1133 ; .onInit doesn't take effect until it is finished. |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1134 !ifndef WITH_GTK |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1135 Call DoWeNeedGtk |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1136 Pop $0 |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1137 Pop $GTK_FOLDER |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1138 |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1139 StrCmp $0 "0" have_gtk need_gtk |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1140 need_gtk: |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1141 IfSilent skip_mb |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1142 MessageBox MB_OK $(GTK_INSTALLER_NEEDED) IDOK |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1143 skip_mb: |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1144 Quit |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1145 have_gtk: |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1146 !endif |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1147 FunctionEnd |
f48c6e4db102
[gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7575
diff
changeset
|
1148 |
7572
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
1149 !ifdef WITH_GTK |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1150 Function preGtkDirPage |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1151 Call DoWeNeedGtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1152 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1153 Pop $1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1154 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1155 StrCmp $0 "0" have_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1156 StrCmp $0 "1" upgrade_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1157 StrCmp $0 "2" no_gtk no_gtk |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1158 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1159 ; Don't show dir selector.. Upgrades are done to existing path.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1160 have_gtk: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1161 upgrade_gtk: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1162 Abort |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1163 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1164 no_gtk: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1165 StrCmp $1 "NONE" 0 no_gtk_cont |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1166 ; Got no install rights.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1167 Abort |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1168 no_gtk_cont: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1169 ; Suggest path.. |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1170 StrCmp $1 "HKCU" 0 hklm1 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1171 StrCpy $2 "$SMPROGRAMS" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1172 Push $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1173 Call GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1174 Call GetParent |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1175 Pop $2 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1176 StrCpy $2 "$2\GTK\2.0" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1177 Goto got_path |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1178 hklm1: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1179 StrCpy $2 "${GTK_DEFAULT_INSTALL_PATH}" |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1180 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1181 got_path: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1182 StrCpy $name "GTK+ ${GTK_VERSION}" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1183 StrCpy $GTK_FOLDER $2 |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1184 FunctionEnd |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1185 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1186 Function postGtkDirPage |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1187 StrCpy $name "Gaim ${GAIM_VERSION}" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1188 Push $GTK_FOLDER |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1189 Call VerifyDir |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1190 Pop $0 |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1191 StrCmp $0 "0" 0 done |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1192 IfSilent skip_mb |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1193 MessageBox MB_OK $(GTK_BAD_INSTALL_PATH) IDOK |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1194 skip_mb: |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1195 Abort |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1196 done: |
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1197 FunctionEnd |
7572
6300424eafbf
[gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7558
diff
changeset
|
1198 !endif |
5332
4d734dbc88dd
[gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
5066
diff
changeset
|
1199 |
7558
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1200 ; GetParameters |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1201 ; input, none |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1202 ; output, top of stack (replaces, with e.g. whatever) |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1203 ; modifies no other variables. |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1204 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1205 Function GetParameters |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1206 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1207 Push $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1208 Push $R1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1209 Push $R2 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1210 Push $R3 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1211 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1212 StrCpy $R2 1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1213 StrLen $R3 $CMDLINE |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1214 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1215 ;Check for quote or space |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1216 StrCpy $R0 $CMDLINE $R2 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1217 StrCmp $R0 '"' 0 +3 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1218 StrCpy $R1 '"' |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1219 Goto loop |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1220 StrCpy $R1 " " |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1221 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1222 loop: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1223 IntOp $R2 $R2 + 1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1224 StrCpy $R0 $CMDLINE 1 $R2 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1225 StrCmp $R0 $R1 get |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1226 StrCmp $R2 $R3 get |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1227 Goto loop |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1228 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1229 get: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1230 IntOp $R2 $R2 + 1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1231 StrCpy $R0 $CMDLINE 1 $R2 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1232 StrCmp $R0 " " get |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1233 StrCpy $R0 $CMDLINE "" $R2 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1234 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1235 Pop $R3 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1236 Pop $R2 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1237 Pop $R1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1238 Exch $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1239 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1240 FunctionEnd |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1241 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1242 ; StrStr |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1243 ; input, top of stack = string to search for |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1244 ; top of stack-1 = string to search in |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1245 ; output, top of stack (replaces with the portion of the string remaining) |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1246 ; modifies no other variables. |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1247 ; |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1248 ; Usage: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1249 ; Push "this is a long ass string" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1250 ; Push "ass" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1251 ; Call StrStr |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1252 ; Pop $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1253 ; ($R0 at this point is "ass string") |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1254 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1255 Function StrStr |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1256 Exch $R1 ; st=haystack,old$R1, $R1=needle |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1257 Exch ; st=old$R1,haystack |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1258 Exch $R2 ; st=old$R1,old$R2, $R2=haystack |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1259 Push $R3 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1260 Push $R4 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1261 Push $R5 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1262 StrLen $R3 $R1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1263 StrCpy $R4 0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1264 ; $R1=needle |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1265 ; $R2=haystack |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1266 ; $R3=len(needle) |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1267 ; $R4=cnt |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1268 ; $R5=tmp |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1269 loop: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1270 StrCpy $R5 $R2 $R3 $R4 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1271 StrCmp $R5 $R1 done |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1272 StrCmp $R5 "" done |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1273 IntOp $R4 $R4 + 1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1274 Goto loop |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1275 done: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1276 StrCpy $R1 $R2 "" $R4 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1277 Pop $R5 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1278 Pop $R4 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1279 Pop $R3 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1280 Pop $R2 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1281 Exch $R1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1282 FunctionEnd |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1283 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1284 ; |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1285 ; Parse the Command line |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1286 ; |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1287 ; Unattended install command line parameters |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1288 ; /L=Language e.g.: /L=1033 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1289 ; |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1290 Function ParseParameters |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1291 IntOp $LANG_IS_SET 0 + 0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1292 Call GetParameters |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1293 Pop $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1294 Push $R0 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1295 Push "L=" |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1296 Call StrStr |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1297 Pop $R1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1298 StrCmp $R1 "" next |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1299 StrCpy $R1 $R1 4 2 ; Strip first 2 chars of string |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1300 StrCpy $LANGUAGE $R1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1301 IntOp $LANG_IS_SET 0 + 1 |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1302 next: |
908343b14e70
[gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7357
diff
changeset
|
1303 FunctionEnd |
10212
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10137
diff
changeset
|
1304 |