Ideas to make it easier to style text in conjunction with glue about crayon

[gaborcsardi]

I think it may be possible by defining a as.character.crayon method that just outputs the escapes for the crayon object (if any).

You mean like this?

library(crayon)
start(red)
#> [1] "\033[31m"
finish(red)
#> [1] "\033[39m"

[gaborcsardi]

Oh, I see what you mean

[jimhester]

as.character.crayon <- function(x, ...) {
  start(x)
}

Does work, but you need to reset at the end.

[gaborcsardi]

I think it is a bit awkward that you need to reset. No?

[jimhester]

A bit yeah, but I don't see an easy way to avoid it without complicating the glue parsing a good bit

[gaborcsardi]

I think it is a good idea, but compared to

glue::glue(blue("foo"), red("bar"), "baz")

the proposed

glue::glue("{blue}foo{red}bar{reset}baz")

is not much better imo. But we probably just need better examples for motivation, I think. Examples that actually use substitution.

[jimhester]

I think the main benefit is you don't have to deal with quoting and unquoting in longer text.

glue("{red}Warning:{reset} this is a warning message") 

# Or
glue("
{bold}A title of a very important piece{reset}

Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore
 et dolore magna aliqua. {blue}Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris 
nisi ut aliquip ex ea commodo consequat. {green}Duis aute irure dolor in reprehenderit in voluptate 
velit esse cillum dolore eu fugiat nulla pariatur. {red} Excepteur sint occaecat cupidatat non 
proident, sunt in culpa qui officia deserunt mollit anim id est laborum.{reset}
")

The resets are a bit of a pain, but not too bad...