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%