From 7df5691dfb8f51ec34208540c5778d9646f8236a Mon Sep 17 00:00:00 2001
From: Ansgar Becker <anse@heidisql.com>
Date: Sun, 26 Nov 2023 11:58:19 +0100
Subject: [PATCH] Installer: use a more stable way to get the major.minor app
 version

---
 out/heidisql.iss | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/out/heidisql.iss b/out/heidisql.iss
index 397c7acc..4fe22f8d 100644
--- a/out/heidisql.iss
+++ b/out/heidisql.iss
@@ -4,13 +4,17 @@
 #define ProgName "HeidiSQL"
 #define ProgNameLower LowerCase(ProgName)
 #define ProgExeName ProgNameLower + ".exe"
-#define ProgVersion GetFileVersion(AddBackslash(SourcePath) + ProgNameLower + "32.exe")
-; Take care: this takes the first 4(!) chars of the exe's version string, eg "10.0"
-#define ProgShortVersion Copy(ProgVersion, 1, 4)
 #define WebSite "https://www." + ProgNameLower + ".com/"
 #define OutDir "."
 #define ResourceDir OutDir + "\..\res\"
 #define SnippetsDir "{autodocs}\" + ProgName + "\Snippets"
+; Some effort to get the major.minor program version: "11.23"
+#define ProgVerMajor
+#define ProgVerMinor
+#define ProgVerRevision
+#define ProgVerBuild
+#define ProgVersion GetVersionComponents(AddBackslash(SourcePath) + ProgNameLower + "32.exe", ProgVerMajor, ProgVerMinor, ProgVerRevision, ProgVerBuild)
+#define ProgShortVersion Str(ProgVerMajor) + "." + Str(ProgVerMinor)
 
 [Languages]
 Name: "en"; MessagesFile: "compiler:Default.isl"