Rebol Programming/undirize

= USAGE: = UNDIRIZE path

= DESCRIPTION: = Returns a copy of the path with any trailing "/" removed.

UNDIRIZE is a function value. = ARGUMENTS =
 * path -- (Type: file string url)

= SOURCE CODE = undirize: func [ {Returns a copy of the path with any trailing "/" removed.} path [file! string! url!] ][ path: copy path if #"/" = pick path length? path [clear back tail path] path ]