View/Edit #281:render_a

Switch to edit mode.

Name(s): render_a
1:  {text, tag, @junk} = args
2:  explode = this:explode_tag(tag)
3:  if (l = listassoc(explode, "href"))
4:    "  return {@text[1..$ - 1], tostr(\"'\", text[$], \"'\", \" \", \"[LINK: \", l[2], \"]\")};"
5:    "If anyone doens't like this change, feel free to change it back. - Raptor"
6:    try
7:      if (text[$] == l[2])
8:        return {@text[1..$ - 1], l[2]}
9:      else
10:       return {@text[1..$ - 1], tostr("[LINK: `", text[$], "' - ", l[2], "]")}
11:     endif
12:   except (E_RANGE)
13:     "Badly formed invalid and messed-up A tag."
14:     return text
15:   endtry
16: elseif (l = listassoc(explode, "xch_cmd"))
17:   "  return {@text[1..$ - 1], tostr(\"'\", text[$], \"'\", \" \", \"[Command: \\\"\", l[2], \"\\\"]\")};"
18:   "return {@text[1..$ - 1], tostr(\"[Command: `\", text[$], \"' - \\\"\", l[2], \"\\\"]\")};"
19:   "Alternatively, we could also just skip displaying embedded commands altogether..."
20:   return {@text[1..$ - 1], text[$]}
21: endif
22: return text
23: "Last modified by Cecil (#7407) on Wed Feb 19 22:00:57 2003 MST."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Cecil (#7407)

You are not logged in.

[home | help | who | search | setup | code]