411 REFERENCE · Wikibooks
Rebol Programming/in-dir
Reference material by Wikibooks contributors. This retains its source identity and is not 411 news reporting.
USAGE:
IN-DIR dir block
DESCRIPTION:
Evaluate a block while in a directory.
IN-DIR is a function value.
ARGUMENTS:
dir -- Directory to change to (changed back after) (Type: file)
block -- Block to evaluate (Type: block)
(SPECIAL ATTRIBUTES)
throw
SOURCE CODE
in-dir: func [
"Evaluate a block while in a directory."
[throw]
dir [file!] "Directory to change to (changed back after)"
block [block!] "Block to evaluate"
/local old-dir
][
old-dir: what-dir
change-dir dir
also do block change-dir old-dir
]