avoid spaces around ^

krlmlr · krlmlr · commit 5d32cf8f0bef · 2018-02-23T18:54:56.000+01:00
diff --git a/R/style_guides.R b/R/style_guides.R
@@ -321,5 +321,5 @@ specify_math_token_spacing <-
 #' )
 #' @export
 tidyverse_math_token_spacing <- function() {
-  specify_math_token_spacing(one = c("'+'", "'-'", "'*'", "'/'", "'^'"))
+  specify_math_token_spacing(one = math_token_lo)
 }
diff --git a/R/token-define.R b/R/token-define.R
@@ -27,6 +27,7 @@ token <- tribble(
 )
 
 math_token <- token$token[token$class == "math"]
+math_token_lo <- setdiff(math_token, "^")
 logical_token <- token$token[token$class == "logical"]
 left_assignment_token <- token$token[token$class == "assign_left"]
 right_assignment_token <- token$token[token$class == "assign_right"]

Original file line number	Diff line number	Diff line change
`@@ -321,5 +321,5 @@ specify_math_token_spacing <-`
`321`	`321`	`#' )`
`322`	`322`	`#' @export`
`323`	`323`	`tidyverse_math_token_spacing <- function() {`
`324`		`- specify_math_token_spacing(one = c("'+'", "'-'", "'*'", "'/'", "'^'"))`
	`324`	`+ specify_math_token_spacing(one = math_token_lo)`
`325`	`325`	`}`
Original file line number	Diff line number	Diff line change
`@@ -27,6 +27,7 @@ token <- tribble(`
`27`	`27`	`)`
`28`	`28`
`29`	`29`	`math_token <- token$token[token$class == "math"]`
	`30`	`+math_token_lo <- setdiff(math_token, "^")`
`30`	`31`	`logical_token <- token$token[token$class == "logical"]`
`31`	`32`	`left_assignment_token <- token$token[token$class == "assign_left"]`
`32`	`33`	`right_assignment_token <- token$token[token$class == "assign_right"]`