195
@verb #1492:"_mail_text" this none this rxdo #60
@program #1492:"_mail_text" this none this
if (this:_textp())
  return this.value
else
  text = {}
  for x in (this.value)
    parse = $gopher:parse(x)
    sel = parse[4]
    text = {@text, "Type=" + sel[1], "Name=" + sel[2..length(sel)], "Path=" + parse[3], "Host=" + parse[1], "Port=" + tostr(parse[2]), "#"}
  endfor
  return text
endif
.

0