Skip to content

Instantly share code, notes, and snippets.

@jrnold
Created June 27, 2018 18:14
Show Gist options
  • Save jrnold/f0d3d991e217d6376d2ac93d2f008792 to your computer and use it in GitHub Desktop.
Save jrnold/f0d3d991e217d6376d2ac93d2f008792 to your computer and use it in GitHub Desktop.
Hey Gurl
# The print.warnings method only handles printing the last.warning object
# in the warnings() function.
print.warnings <- function(object,
header = "Hey Gurl \U0001f308:\n", ...) {
base:::print.warnings(object, header = header, ...)
}
# I think the message hearder is hardcoded into the do_dfltWarn() function in C
# It uses gettext so one could probably write a "translation" of that message
# and create a custom domain
warning("hello, world!")
# But this works
warnings()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment