Warning, file /office/calligra/windows/calligra_installer/identifybuiltcomponents.vbs was not indexed or was modified since last indexation (in which case cross-reference links may be missing, inaccurate or erroneous).
0001 Set fso = CreateObject("Scripting.FileSystemObject") 0002 Set wshShell = CreateObject("WScript.Shell") 0003 0004 Dim envvar, filedir 0005 0006 Sub CheckForApp(filename, varname) 0007 envvar = "set BUILD" & varname 0008 filedir = wshShell.ExpandEnvironmentStrings( "%C2WINSTALL_INPUT%\bin\" ) 0009 0010 If fso.FileExists( filedir & filename ) Then 0011 WScript.Echo envvar & "=on" 0012 Else 0013 Wscript.Echo envvar & "=off" 0014 End If 0015 End Sub 0016 0017 ' Check whether a file exists 0018 ' If so, then set an environment variable BUILD<app> to on or off, as appropriate 0019 CheckForApp "calligrawords.exe", "words" 0020 CheckForApp "calligrastage.exe", "stage" 0021 CheckForApp "calligrasheets.exe", "sheets" 0022 0023 CheckForApp "calligraflow.exe", "flow" 0024 0025 CheckForApp "karbon.exe", "karbon" 0026 0027 Set fso = Nothing 0028 Set wshSystemEnv = Nothing 0029 Set wshShell = Nothing