====== R ====== Tested with opsi 4.0.3\\ requiredWinstVersion >= 4.10.8.6\\ Tested with R 3.0.2\\ By --- //[[florian.knodt@finzelberg.de|adlerweb]] 2014/02/27 14:43// Files can be downloaded at http://cran.rstudio.com/bin/windows/base/ Tree:\\ setup.ins\\ uninstall.ins\\ delsub.ins\\ === setup.ins === [Actions] requiredWinstVersion >= "4.10.8.6" DefVar $ProductId$ DefVar $MinimumSpace$ DefVar $UninstallProgram$ Set $ProductId$ = "r" Set $MinimumSpace$ = "150 MB" ShowBitmap "%ScriptPath%\" + $ProductId$ + ".png" $ProductId$ if not(HasMinimumSpace ("%SystemDrive%", $MinimumSpace$)) LogError "Not enough space on %SystemDrive%, " + $MinimumSpace$ + " on drive %SystemDrive% needed for " + $ProductId$ isFatalError ; Stop process and set installation status to failed else if FileExists("%ScriptPath%\delsub.ins") comment "start uninstall" sub "%ScriptPath%\delsub.ins" endif comment "installing" comment "Start setup program" Winbatch_install endif [Winbatch_install] "%ScriptPath%\R-3.0.2-win.exe" /silent ===uninstall.ins=== [Actions] DefVar $ProductId$ DefVar $UninstallProgram$ Set $ProductId$ = "r" ShowBitmap "%ScriptPath%\" + $ProductId$ + ".png" $ProductId$ if FileExists("%ScriptPath%\delsub.ins") comment "start uninstall" sub "%ScriptPath%\delsub.ins" endif ===delsub.ins=== ;Version 3.0.2 Set $UninstallProgram$ = "%ProgramFilesSysnativeDir%\R\R-3.0.2\unins000.exe" if FileExists($UninstallProgram$) Message "Found "+$ProductId$+" => uninstalling first" Winbatch_uninstall endif [Winbatch_uninstall] "$UninstallProgram$" /silent