summaryrefslogtreecommitdiff
path: root/tools/installer_ng/MirandaNG.iss
diff options
context:
space:
mode:
authorVadim Dashevskiy <watcherhd@gmail.com>2013-09-06 22:22:37 +0000
committerVadim Dashevskiy <watcherhd@gmail.com>2013-09-06 22:22:37 +0000
commite6cca3eb87b8200c23545cd061142943f1487996 (patch)
tree7127535e3f244015fac385c6570365181d195d01 /tools/installer_ng/MirandaNG.iss
parent35fe3582d7ac4c8ef958beb6ed24eb0b230aad67 (diff)
- Installer: prevent installation to the folder that already containing previous installation (this installer is not for upgrades, PluginUpdater is)
git-svn-id: http://svn.miranda-ng.org/main/trunk@5985 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'tools/installer_ng/MirandaNG.iss')
-rw-r--r--tools/installer_ng/MirandaNG.iss16
1 files changed, 7 insertions, 9 deletions
diff --git a/tools/installer_ng/MirandaNG.iss b/tools/installer_ng/MirandaNG.iss
index d16083e046..0ee56bfad5 100644
--- a/tools/installer_ng/MirandaNG.iss
+++ b/tools/installer_ng/MirandaNG.iss
@@ -210,7 +210,7 @@ en.PortTypeInstLabel=Profiles and user data files are stored in program folder.%
en.ProfileUninst=WARNING!!!%nYou are about to delete profile folder containing all your settings, contacts and message history!%nAre you sure you want to remove profile?%n(You may need it later)
en.FolderExists1=Folder
-en.FolderExists2=already exists. Continue installation?
+en.FolderExists2=already exists. This installer is for a first time install only! Please select another folder for a new installation.%nIf you wish to upgrade your current program, please use PluginUpdater%n("Check for plugin updates" item in Miranda's main menu).
en.PercentDone=% done
@@ -291,8 +291,8 @@ ru.PortTypeInstLabel=Профиль и файлы пользователя на
ru.ProfileUninst=ПРЕДУПРЕЖДЕНИЕ!!!%nВы можете удалить папку профиля, включающую в себя настройки, контакты и историю переписки!%nВы действительно хотите удалить файлы профиля?%n(Может понадобиться в дальнейшем)
-ru.FolderExists1=Папка
-ru.FolderExists2=уже существует. Продолжить установку?
+ru.FolderExists1=Выбранная папка
+ru.FolderExists2=включает в себя предыдущую установку! Установщик не предназначен для обновления.%nПожалуйста, выберите иную папку для новой установки.%nДля обновления уже установленной программы воспользуйтесь плагином PluginUpdater%n(Пункт "Проверить обновления плагинов" в главном меню).
ru.PercentDone=% выполнено
@@ -909,13 +909,11 @@ begin
ExpandConstant('{cm:LangEnglishDescription}') + ';' +
'');
- if DirExists(WizardForm.DirEdit.Text) then
+ if DirExists(WizardForm.DirEdit.Text) and FileExists(WizardForm.DirEdit.Text+'\{#MirName}') then
begin
- case MsgBox(ExpandConstant('{cm:FolderExists1}')+#10+#10+WizardForm.DirEdit.Text+#10+#10+ExpandConstant('{cm:FolderExists2}'), mbconfirmation, mb_YesNo) of
- IDYES:;
- IDNO:
- Result := False;
- end;
+ MsgBox(ExpandConstant('{cm:FolderExists1}')+#10+#10+WizardForm.DirEdit.Text+#10+#10+ExpandConstant('{cm:FolderExists2}'), mbError, MB_OK);
+ Result := False;
+ exit;
end;
end;