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.

git-svn-id: https://svn.neo-layout.org@1220 b9310e46-f624-0410-8ea1-cfbb3a30dc96

3 files changed, 30 insertions, 2 deletions

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%