feat: Show-Turtle ( Fixes #257 )

Will not show when not interactive

Author: StartAutomating

Commands/Show-Turtle.ps1

@@ -29,6 +29,12 @@ function Show-Turtle
         $extensionPattern = "(?>$($validExtensions -replace '\.','\.' -join '|'))$"
     }
     process {
+        # If we are not running interactively,
+        # we obviously do not want to try to show something on the screen.
+        if (-not [Environment]::UserInteractive) {
+            # Instead, just pass thru our input.
+            return $InputObject
+        }
         if ($InputObject -is [IO.FileInfo] -and $InputObject.Extension -match $extensionPattern) {
             Invoke-Item $InputObject.Fullname
         } elseif ($InputObject.pstypenames -contains 'Turtle') {            

Turtle.tests.ps1

@@ -66,5 +66,23 @@ describe Turtle {
         }
     }
 
-    
+    context 'Turtle Security' {
+        it 'Can run in a data block' {
+            $dataBlockTurtle = data -supportedCommand turtle, Get-Random {
+                turtle rotate 45 forward (Get-Random -Min 21 -Max 42)
+            }
+            $dataBlockTurtle.Heading | Should -Be 45
+        }
+        it 'Will not show a turtle in non-interactive mode' {
+            if ([Environment]::UserInteractive) {
+                Write-Warning "Cannot test non-iteractivity interactively"
+            } else {
+                $dataBlockTurtle = data -supportedCommand turtle, Get-Random {
+                    turtle rotate 45 forward (Get-Random -Min 21 -Max 42) show
+                }
+                $dataBlockTurtle.Heading | Should -Be 45   
+            }
+        }
+    }
 }
+