evaluate (version 0.8.3)

set_hooks: Set hooks.

Description

This wraps the base setHook function to provide a return value that makes it easy to undo.

Usage

set_hooks(hooks, action = "append")

Arguments

hooks
a named list of hooks - each hook can either be a function or a list of functions.
action
"replace", "append" or "prepend"

Examples

Run this code
new <- list(before.plot.new = function() print("Plotted!"))
hooks <- set_hooks(new)
plot(1)
set_hooks(hooks, "replace")
plot(1)

Run the code above in your browser using DataCamp Workspace