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