Cover more cases without hurting and increment version number

mkcor · mkcor · commit 7f34452db2dd · 2014-10-20T15:20:10.000-04:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: plotly
 Type: Package
 Title: Interactive, publication-quality graphs online.
-Version: 0.5.2
+Version: 0.5.3
 Authors@R: c(person("Chris", "Parmer", role = c("aut", "cre"),
     email = "chris@plot.ly"),
     person("Scott", "Chamberlain", role = "aut",
diff --git a/R/trace_generation.R b/R/trace_generation.R
@@ -268,7 +268,7 @@ toBasic <- list(
     g
   },
   bar=function(g) {
-    if (all(is.na(g$prestats.data$x)))
+    if (any(is.na(g$prestats.data$x)))
       g$prestats.data$x <- g$prestats.data$x.name
     g$prestats.data$fill <- g$data$fill[match(g$prestats.data$group, g$data$group)]
     g$params$xstart <- min(g$data$xmin)

Original file line number	Diff line number	Diff line change
`@@ -268,7 +268,7 @@ toBasic <- list(`
`268`	`268`	`g`
`269`	`269`	`},`
`270`	`270`	`bar=function(g) {`
`271`		`- if (all(is.na(g$prestats.data$x)))`
	`271`	`+ if (any(is.na(g$prestats.data$x)))`
`272`	`272`	`g$prestats.data$x <- g$prestats.data$x.name`
`273`	`273`	`g$prestats.data$fill <- g$data$fill[match(g$prestats.data$group, g$data$group)]`
`274`	`274`	`g$params$xstart <- min(g$data$xmin)`