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