summaryrefslogtreecommitdiff
path: root/windows
diff options
context:
space:
mode:
Diffstat (limited to 'windows')
-rw-r--r--windows/neo-vars/src/neo20-all.ahk1
-rw-r--r--windows/neo-vars/src/source/_subwcrev1.generated.ahk1
-rw-r--r--windows/neo-vars/src/source/initialize.ahk30
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%