anchor.diff:  
           if vmCount < 1 then invalidArg "vmCount" "must be positive value."
           let region = defaultArg region defaultRegion
  -        let client = pubSettings.GetClientByIdOrDefault(?id = subscriptionId)
  +        let client = subscriptions.GetClientByIdOrDefault(?id = subscriptionId)
           let serviceName = match serviceName with None -> Common.generateResourceName() | Some sn -> sn
           do! Deployment.validateServiceName client serviceName
   
  
positive.code:         and set reg = defaultRegion <- reg
  
      /// Lists all subscription names supplied in the current deployment manager instance
      member __.Subscriptions = pubSettings.Subscriptions |> Array.map (fun s -> s.Subscription.Name)
      /// Gets or sets the default subscription used by the deployment manager instance
      member __.DefaultSubscription 
          with get () = pubSettings.Default.Subscription.Name
          and set subId =
              lock syncRoot (fun () ->
                  let sub = pubSettings.[subId]
                  pubSettings <- { pubSettings with Default = sub })
  
      /// <summary>
      ///     Asynchronously starts deployment of MBrace cloud service with supplied parameters.
  
negative.code:     /// <param name="serviceName">Service name to be looked up.</param>
      /// <param name="subscriptionId">Subscription id to fetch deployments from. Defaults to manager instance subscription default.</param>
      member __.GetConfigurationAsync(serviceName : string, ?subscriptionId : string) = async {
          let client = subscriptions.GetClientByIdOrDefault(?id = subscriptionId)
          let! result = Deployment.tryGetDeploymentConfiguration serviceName client
          match result with
          | Some config -> return config
  