From d4487ddb52deb48475285045f6f7f7149221b0b5 Mon Sep 17 00:00:00 2001
From: mösi <mösi@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Tue, 18 Nov 2008 15:40:37 +0000
Subject: Build-Prozess wieder in Ordnung gebracht: die generierte
 _subwcrev1.generated.ahk, die dort nur eingecheckt war, damit auch im
 AHK-Skript eine Revision angezeigt wird und nicht nur im .EXE, wurde wieder
 entfernt. Nach Möglichkeit werden zwei SVN-Clients gesucht: TortoiseSVN und
 CollabNet-SVN-CLI, und mit deren Bordmitteln wird beim AHK-Skript dynamisch
 die aktuelle Revision und der Consistentcy State eruiert (der Output der
 beiden Tools ist unterschiedlich, aber das stört im Moment kaum). Was fehlt
 ist eine sinnvolle Lösung für den Anwender, der sich die einzelnen
 AHK-Sourcefiles ohne Subversion runterlädt oder einen anderen SVN-Client
 verwendet. In diesen Fällen wird derzeit „r<unknown>“ ausgegeben. Nicht
 hübsch, aber immerhin etwas.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://svn.neo-layout.org@1220 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 windows/neo-vars/src/neo20-all.ahk                 |  1 -
 .../neo-vars/src/source/_subwcrev1.generated.ahk   |  1 -
 windows/neo-vars/src/source/initialize.ahk         | 30 ++++++++++++++++++++++
 3 files changed, 30 insertions(+), 2 deletions(-)
 delete mode 100644 windows/neo-vars/src/source/_subwcrev1.generated.ahk

(limited to 'windows')

diff --git a/windows/neo-vars/src/neo20-all.ahk b/windows/neo-vars/src/neo20-all.ahk
index 8e0b183..1c2c776 100644
--- a/windows/neo-vars/src/neo20-all.ahk
+++ b/windows/neo-vars/src/neo20-all.ahk
@@ -4,7 +4,6 @@ SetWorkingDir, %A_ScriptDir%
 
 ; Revision Information (don't moun)
 #include *i source\_subwcrev1.generated.ahk
-#include *i source\_subwcrev1.ahk
 
 ; die Compose-Definitionen
 #include *i source\compose.generated.ahk
diff --git a/windows/neo-vars/src/source/_subwcrev1.generated.ahk b/windows/neo-vars/src/source/_subwcrev1.generated.ahk
deleted file mode 100644
index 925ed05..0000000
--- a/windows/neo-vars/src/source/_subwcrev1.generated.ahk
+++ /dev/null
@@ -1 +0,0 @@
-Revision:="1209"
diff --git a/windows/neo-vars/src/source/initialize.ahk b/windows/neo-vars/src/source/initialize.ahk
index 976afcf..48cecd5 100644
--- a/windows/neo-vars/src/source/initialize.ahk
+++ b/windows/neo-vars/src/source/initialize.ahk
@@ -1,3 +1,33 @@
+if (A_IsCompiled) {
+; Revisionsinformation bereits verfügbar
+} else {
+; Revisionsinformation nicht verfügbar oder nicht zuverlässig, neu generieren
+  if (FileExist(".svn")<>False) {
+    ; .svn existiert, scheint also ausgecheckt worden zu sein
+    RegRead,TSVNPath,HKLM,SOFTWARE\TortoiseSVN,Directory
+    RegRead,SVNPath,HKLM,SOFTWARE\CollabNet\Subversion\1.5.4\Client,Install Location
+    if (TSVNPath<>"") {
+      ; fein, TSVN ist installiert!
+      RunWait, "%TSVNPath%bin\SubWCRev.exe" "." "Source\_subwcrev1.tmpl.ahk" "Source\_subwcrev1.generated.ahk",,Hide
+      FileRead,TSVNRevFull,Source\_subwcrev1.generated.ahk
+      RegExMatch(TSVNRevFull,"""(.*)""",SubPat)
+      Revision := SubPat1
+    } else if (SVNPath<>"") {
+      ; fein, CollabNet-SVN-Client ist installiert!
+      RunWait, %comspec% /c ""%SVNPath%\svnversion.exe" "." >"Source\_svnversion.generated.txt"",,Hide
+      FileRead,SVNRevFull,Source\_svnversion.generated.txt
+      RegExMatch(SVNRevFull,"(.*)$",SubPat)
+      Revision := SubPat1
+    } else {
+      ; nichts installiert. Was jetzt?
+      Revision := "<unknown>"
+    }
+  } else {
+    ; kein .svn-Verzeichnis. Was jetzt?
+    Revision := "<unknown>"
+  }
+}
+
 name=Neo 2.0 r%Revision%-r%CompRevision% (%A_ScriptName%)
 enable=Aktiviere %name%
 disable=Deaktiviere %name%
-- 
cgit v1.2.3