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