New-AzureRmWebAppSlot returns an error if I don't add the Optional

parameter AppServicePlan #6414

Updating Failing tests

Styling fix

Updating changeLog

Updating to match the latest changeLog

Author: panchagnula

src/ResourceManager/Websites/ChangeLog.md

@@ -18,6 +18,8 @@
         - Additional information about change #1
 -->
 ## Current Release
+* `Set-AzureRmWebApp` is updated to not overwrite the AppSettings when using -AssignIdentity
+* `New-AzureRmWebAppSlot` is updated to honor AppServicePlan as an optional parameter
 
 ## Version 5.0.2
 * `New-AzureRMWebApp` is updated to use common algorithms from the Strategy library.

src/ResourceManager/Websites/Commands.Websites.Test/ScenarioTests/WebAppSlotTests.ps1

@@ -406,7 +406,7 @@ function Test-CreateNewWebAppSlot
 		Assert-AreEqual $serverFarm.Id $result.ServerFarmId
 
 		# Create deployment slot
-		$job = New-AzureRmWebAppSlot -ResourceGroupName $rgname -Name $appname -Slot $slotname -AppServicePlan $planName -AsJob
+		$job = New-AzureRmWebAppSlot -ResourceGroupName $rgname -Name $appname -Slot $slotname -AsJob
 		$job | Wait-Job
 		$slot1 = $job | Receive-Job
 

src/ResourceManager/Websites/Commands.Websites.Test/SessionRecords/Microsoft.Azure.Commands.Websites.Test.ScenarioTests.WebAppSlotTests/TestCreateNewWebAppSlot.json

@@ -90,7 +90,7 @@ public override void ExecuteCmdlet()
 
             var webApp = WebsitesClient.GetWebApp(ResourceGroupName, Name, null);
 
-            WriteObject(WebsitesClient.CreateWebApp(ResourceGroupName, Name, Slot, webApp.Location, AppServicePlan, cloningInfo, AseName, AseResourceGroupName));
+            WriteObject(WebsitesClient.CreateWebApp(ResourceGroupName, Name, Slot, webApp.Location, AppServicePlan==null?webApp.ServerFarmId : AppServicePlan, cloningInfo, AseName, AseResourceGroupName));
         }
     }
 }