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