robert.hooke — robert/hooke 1.3.0

Hooke your functions!

(defn examine [x] (println x))

(defn microscope "The keen powers of observation enabled by Robert Hooke allow for a closer look at any object!" [f x] (f (.toUpperCase (str x))))

(defn doubler [f & args] (apply f args) (apply f args))

(defn telescope [f x] (f (apply str (interpose " " x))))

(add-hook #'examine #'microscope) (add-hook #'examine #'doubler) (add-hook #'examine #'telescope)

;; Now when we examine something: (examine "something")

S O M E T H I N G S O M E T H I N G

Use the add-hook function to wrap a function in your a hook.

add-hook clj

(add-hook target-var f)

(add-hook target-var key f)

Add a hook function f to target-var. Hook functions are passed the target function and all their arguments and must apply the target to the args if they wish to continue execution.

append clj macro

(append target-var & body)

clear-hooks clj

(clear-hooks target-var)

Remove all hooks from target-var.

end-scope clj

(end-scope)

hook-scopes clj

prepend clj macro

(prepend target-var & body)

remove-hook clj

(remove-hook target-var key)

Remove hook identified by key from target-var.

start-scope clj

(start-scope)

with-hooks-disabled clj macro

(with-hooks-disabled f & body)

with-scope clj macro

(with-scope & body)

Defines a scope which records any change to hooks during the dynamic extent of its body, and restores hooks to their original state on exit of the scope.