Rebol 编程/path-thru

用法

PATH-THRU url 

描述

返回相对于磁盘缓存的路径。

PATH-THRU 是一个函数值。

参数

• url -- (类型：任何)

源代码

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 ""]]
]