fix template deployment bug

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: AzureRMR
 Title: Interface to 'Azure Resource Manager'
-Version: 2.1.1
+Version: 2.1.1.9000
 Authors@R: c(
     person("Hong", "Ooi", , "hongooi@microsoft.com", role = c("aut", "cre")),
     person("Microsoft", role="cph")

NEWS.md

@@ -1,3 +1,7 @@
+# AzureRMR 2.1.1.9000
+
+- Fix a bug in template deployment where null fields were not handled correctly.
+
 # AzureRMR 2.1.1
 
 * Some refactoring of login code to better handle AzureAuth options. As part of this, the `config_file` argument for `az_rm$new` has been removed; to use a configuration file, call the (recommended) `create_azure_login` function.

R/az_template.R

@@ -215,8 +215,11 @@ private=list(
         else modifyList(properties, list(parameters=jsonlite::fromJSON(parameters, simplifyVector=FALSE)))
 
         self$name <- name
-        parms <- private$tpl_op(body=jsonlite::toJSON(list(properties=properties), auto_unbox=TRUE, digits=22),
-            encode="raw", http_verb="PUT")
+        parms <- private$tpl_op(
+            body=jsonlite::toJSON(list(properties=properties), pretty=TRUE, auto_unbox=TRUE, null="null", digits=22),
+            encode="raw",
+            http_verb="PUT"
+        )
 
         # do we wait until template has finished provisioning?
         if(wait)