Aes format ticks are not formatted properly (#2613)

* move fancy tick marks inside format call

* globalVariables use utils package

Author: schloerke

R/aes.r

@@ -128,7 +128,7 @@ print.uneval <- function(x, ...) {
     cat("<empty>\n")
   } else {
     values <- vapply(x, rlang::quo_label, character(1))
-    bullets <- paste0("* `", format(names(x)), "` -> ", values, "\n")
+    bullets <- paste0("* ", format(paste0("`", names(x), "`")), " -> ", values, "\n")
 
     cat(bullets, sep = "")
   }

R/guide-legend.r

@@ -745,4 +745,4 @@ label_just_defaults.legend <- function(direction, position) {
 }
 
 
-globalVariables(c("C", "R", "key.row", "key.col", "label.row", "label.col"))
+utils::globalVariables(c("C", "R", "key.row", "key.col", "label.row", "label.col"))

R/labeller.r

@@ -230,7 +230,7 @@ label_bquote <- function(rows = NULL, cols = NULL,
 
   structure(fun, class = "labeller")
 }
-globalVariables(c("x", "."))
+utils::globalVariables(c("x", "."))
 
 #' @rdname labellers
 #' @export