Test/Set-ScriptPath.Tests.ps1

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

param (
    [string] $PSScriptRoot = $( if ( $PSScriptRoot ) { $PSScriptRoot } else { Get-Location } )
)

. $PSScriptRoot\TestHelper.ps1

Describe 'Set-RScript' {
    It 'works with a valid path' {
        Set-RScriptPath -Path 'C:\Program Files\Microsoft\R Open\R-3.5.2\bin\x64\Rscript.exe'
    }

    It 'fails with a invalid path' {
        {
            Set-RScriptPath -Path 'C:\Program Files\Microsoft\R Open\R-3.5.2\bin\x64\R.exe'
        } | Should -Throw
    }

    It 'fails with a directory path' {
        {
            Set-RScriptPath -Path 'C:\Program Files'
        } | Should -Throw
    }
}