@verb #24:"PUEBLOCLIENT" any any any rxdo #55 @program #24:"PUEBLOCLIENT" any any any "Generic Client-identifying verb." "" "Should be called from $login in the format: CLIENTCOMMAND [arg1 [arg2 ...]]" caller == this || caller == $login || raise(E_PERM) try if (verb == "PUEBLOCLIENT") if (caller == this) "first time calling, do the magic ANSI garbage." this:notify_bin("~1B[1;37;40m~1B[0;27m~0D~0A") this:notify_bin("") this:notify_bin("

")
      this:notify_bin("Pueblo client recognized.~0D~0A")
    endif
    {version, hash} = args
    this.pueblo_MD5 = $su:explode(hash, "=")[2]
    this.pueblo_version = version
    this.output_rendering_object = $pueblo_renderer
    this.output_accent_mode = "HTML"
  endif
except e (ANY)
  #7407:tell("#24:PUEBLOCLIENT error! ", toliteral(e))
endtry
"Last modified by manta (#7165) on Mon Aug 12 14:19:24 2002 MDT."
"This verb previously owned by Raptor (#6319), and chowned to $slacker upon dewizarding (Sat Aug 17 14:48:42 2002 MDT)."
"Last modified by Cecil (#7407) on Tue Sep  3 08:25:27 2002 MDT."
.