Get-ADOTest: Carrying along TestPlanname, attempting PSTypename fix f…

…or TestPoint.
Coast-Technologies · Apr 15, 2021 · ee66fd3 · ee66fd3
1 parent ba9d086
commit ee66fd3
Showing 1 changed file with 8 additions and 3 deletions.
diff --git a/Get-ADOTest.ps1 b/Get-ADOTest.ps1
@@ -126,7 +126,7 @@
         $q = [Collections.Queue]::new()
     }
     process {
-        $q.Enqueue(@{PSParameterSet=$psCmdlet.ParameterSetName} + $PSBoundParameters)
+        $q.Enqueue(@{PSParameterSet=$psCmdlet.ParameterSetName;InputObject=$_} + $PSBoundParameters)
     }
     end {
         $c, $t, $progId = 0, $q.Count, [Random]::new().Next()
@@ -154,15 +154,20 @@
 
             $typeName = @($psParameterSet -split '/' -notlike '{*}')[-1] -replace
                 '\{' -replace '\}' -replace 'ies$', 'y' -replace 's$' -replace 'ID$' -replace
-                    '(Plan|Run|Suite|Configuration|Point|Attachment|Result)', 'Test$0'
+                    '(TestPlan|Plan|Run|Suite|Configuration|TestPoint|Attachment|Result)', 'Test$0'
 
             $additionalProperty = @{
                 Organization = $Organization
                 Project = $Project
                 Server = $Server
             }
             if ($ProjectID)   { $additionalProperty.ProjectID = $ProjectID }
-            if ($TestPlanID)  { $additionalProperty.TestPlanID = $TestPlanID }
+            if ($TestPlanID)  { 
+                $additionalProperty.TestPlanID = $TestPlanID 
+            }
+            if ($inputObject.TestPlanName) {
+                $additionalProperty['TestPlanName'] = $inputObject.TestPlanName
+            }
             if ($TestSuiteID) { $additionalProperty.TestSuiteID = $TestSuiteID }
             Invoke-ADORestAPI @invokeParams -uri $uri -PSTypeName "$Organization.$typeName",
                 "PSDevOps.$typeName" -Property $additionalProperty