petern/OpenTTD
1
0
Fork 0
forked from mirror/OpenTTD
Code Pull Requests Activity

(svn r14780) -Fix (r14777): of course VBS evaluates all parts of a boolean expression

Browse Source
This commit is contained in:
glx
2009-01-01 18:18:17 +00:00
parent 5a6d3a601d
commit bf16032308
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
projects/determineversion.vbs
View File

@@ -273,12 +273,12 @@ Function IsCachedVersion(ByVal version)
End Function End Function
Function CheckFile(filename) Function CheckFile(filename)
CheckFile = FSO.FileExists(filename) And (FSO.GetFile(filename).DateLastModified >= FSO.GetFile(filename & ".in").DateLastModified) CheckFile = FSO.FileExists(filename)
If CheckFile Then CheckFile = (FSO.GetFile(filename).DateLastModified >= FSO.GetFile(filename & ".in").DateLastModified)
End Function End Function
Dim version Dim version
version = DetermineSVNVersion version = DetermineSVNVersion
If Not (IsCachedVersion(version) And CheckFile("../src/rev.cpp") And CheckFile("../src/ottdres.rc")) Then If Not (IsCachedVersion(version) And CheckFile("../src/rev.cpp") And CheckFile("../src/ottdres.rc")) Then
wscript.echo "update"
UpdateFiles version UpdateFiles version
End If End If