diff options
Diffstat (limited to 'windows/neo-vars')
| -rw-r--r-- | windows/neo-vars/src/neo20-all.ahk | 1 | ||||
| -rw-r--r-- | windows/neo-vars/src/source/_subwcrev1.generated.ahk | 1 | ||||
| -rw-r--r-- | windows/neo-vars/src/source/initialize.ahk | 30 |
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%
|