411 REFERENCE · Wikibooks
Rebol Programming/path-thru
Reference material by Wikibooks contributors. This retains its source identity and is not 411 news reporting.
USAGE:
PATH-THRU url
DESCRIPTION:
Return a path relative to the disk cache.
PATH-THRU is a function value.
ARGUMENTS:
url -- (Type: any)
SOURCE CODE
path-thru: func [
"Return a path relative to the disk cache."
url /local purl
][
if file? url [return url]
if not all [purl: decode-url url purl/host] [return none]
rejoin [view-root/public slash purl/host slash any [purl/path ""] any [purl/target ""]]
]