tests/testthat/_snaps/meta.md

In RonMobile/cli: Helpers for Developing Command Line Interfaces

meta basics [plain]

Code
  cli::cli({
    message("This is before")
    cli_alert_info("First message")
    message("This as well")
    cli_alert_success("Success!")
  })
Message <simpleMessage>
  This is before
  This as well
Message <cliMessage>
  i First message
  v Success!

meta basics [ansi]

Code
  cli::cli({
    message("This is before")
    cli_alert_info("First message")
    message("This as well")
    cli_alert_success("Success!")
  })
Message <simpleMessage>
  This is before
  This as well
Message <cliMessage>
  [36mi[39m First message
  [32mv[39m Success!

meta basics [unicode]

Code
  cli::cli({
    message("This is before")
    cli_alert_info("First message")
    message("This as well")
    cli_alert_success("Success!")
  })
Message <simpleMessage>
  This is before
  This as well
Message <cliMessage>
  ℹ First message
  ✔ Success!

meta basics [fancy]

Code
  cli::cli({
    message("This is before")
    cli_alert_info("First message")
    message("This as well")
    cli_alert_success("Success!")
  })
Message <simpleMessage>
  This is before
  This as well
Message <cliMessage>
  [36mℹ[39m First message
  [32m✔[39m Success!

meta is single cli_message [plain]

Code
  cli_server_default(msgs[[1]])
Message <cliMessage>
  i First message
  v Success!
Output
  NULL

meta is single cli_message [ansi]

Code
  cli_server_default(msgs[[1]])
Message <cliMessage>
  [36mi[39m First message
  [32mv[39m Success!
Output
  NULL

meta is single cli_message [unicode]

Code
  cli_server_default(msgs[[1]])
Message <cliMessage>
  ℹ First message
  ✔ Success!
Output
  NULL

meta is single cli_message [fancy]

Code
  cli_server_default(msgs[[1]])
Message <cliMessage>
  [36mℹ[39m First message
  [32m✔[39m Success!
Output
  NULL

meta is single cliMessage [plain]

Code
  withCallingHandlers(cli::cli({
    cli_alert_info("First message")
    cli_alert_success("Success!")
  }), cliMessage = function(msg) {
    msgs <<- c(msgs, list(msg))
  })
Message <cliMessage>
  i First message
  v Success!

meta is single cliMessage [ansi]

Code
  withCallingHandlers(cli::cli({
    cli_alert_info("First message")
    cli_alert_success("Success!")
  }), cliMessage = function(msg) {
    msgs <<- c(msgs, list(msg))
  })
Message <cliMessage>
  [36mi[39m First message
  [32mv[39m Success!

meta is single cliMessage [unicode]

Code
  withCallingHandlers(cli::cli({
    cli_alert_info("First message")
    cli_alert_success("Success!")
  }), cliMessage = function(msg) {
    msgs <<- c(msgs, list(msg))
  })
Message <cliMessage>
  ℹ First message
  ✔ Success!

meta is single cliMessage [fancy]

Code
  withCallingHandlers(cli::cli({
    cli_alert_info("First message")
    cli_alert_success("Success!")
  }), cliMessage = function(msg) {
    msgs <<- c(msgs, list(msg))
  })
Message <cliMessage>
  [36mℹ[39m First message
  [32m✔[39m Success!

substitution [plain]

Code
  local({
    x <- 1:3
    cli({
      title <- "My title"
      cli_h1("Title: {.emph {title}}")
      cli_text("And {.emph some} more: {.val {x}}")
    })
  })
Message <cliMessage>

  -- Title: My title -------------------------------------------------------------
  And some more: 1, 2, and 3

substitution [ansi]

Code
  local({
    x <- 1:3
    cli({
      title <- "My title"
      cli_h1("Title: {.emph {title}}")
      cli_text("And {.emph some} more: {.val {x}}")
    })
  })
Message <cliMessage>

  [36m--[39m [1m[1mTitle: [3m[1m[3mMy title[3m[1m[23m[1m[22m [36m-------------------------------------------------------------[39m
  And [3m[3msome[3m[23m more: [34m[34m1[34m[39m, [34m[34m2[34m[39m, and [34m[34m3[34m[39m

substitution [unicode]

Code
  local({
    x <- 1:3
    cli({
      title <- "My title"
      cli_h1("Title: {.emph {title}}")
      cli_text("And {.emph some} more: {.val {x}}")
    })
  })
Message <cliMessage>

  ── Title: My title ─────────────────────────────────────────────────────────────
  And some more: 1, 2, and 3

substitution [fancy]

Code
  local({
    x <- 1:3
    cli({
      title <- "My title"
      cli_h1("Title: {.emph {title}}")
      cli_text("And {.emph some} more: {.val {x}}")
    })
  })
Message <cliMessage>

  [36m──[39m [1m[1mTitle: [3m[1m[3mMy title[3m[1m[23m[1m[22m [36m─────────────────────────────────────────────────────────────[39m
  And [3m[3msome[3m[23m more: [34m[34m1[34m[39m, [34m[34m2[34m[39m, and [34m[34m3[34m[39m

RonMobile/cli documentation built on Dec. 18, 2021, 11 a.m.