Find common directory path: Difference between revisions
m
→{{header|Arturo}}
Drkameleon (talk | contribs) (Added Arturo implementation) |
Drkameleon (talk | contribs) |
||
Line 186:
<lang rebol>commonPathPrefix: function [lst][
paths: map lst => [split.
common: new []
Line 200:
if found -> 'common ++ part
]
return join.with:"/"
]
| |||