Rebol Programming/undirize

USAGE:

edit
UNDIRIZE path 

DESCRIPTION:

edit

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

UNDIRIZE is a function value.

ARGUMENTS

edit
  • path -- (Type: file string url)

SOURCE CODE

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