View/Edit #12:@typo @suggest*ion @idea @comment

Switch to edit mode.

1:  subject = tostr($string_utils:capitalize(verb[2..length(verb)]), ":  ", (loc = this.location).name, "(", loc, ")")
2:  if (this != player)
3:    return $msg:mtell("huh")
4:  elseif (argstr)
5:    result = $mail_agent:send_message(this, {loc.owner}, subject, argstr)
6:    if (result && result[1])
7:      player:notify(tostr("Your ", verb, " sent to ", $mail_agent:name_list(@listdelete(result, 1)), ".  Input is appreciated, as always."))
8:    else
9:      player:notify(tostr("Huh?  This room's owner (", loc.owner, ") is invalid?  Tell a wizard..."))
10:   endif
11:   return
12: elseif (!($object_utils:isa(loc, $room) && loc.free_entry))
13:   player:notify({tostr("You need to make it a one-liner, i.e., `", verb, " something or other'."), "This room may not let you back in if you go to the Mail Room."})
14: elseif ($object_utils:isa(loc, $editor))
15:   player:notify({tostr("You need to make it a one-liner, i.e., `", verb, " something or other'."), "Sending you to the Mail Room from an editor is usually a bad idea."})
16: else
17:   $mail_editor:invoke({tostr(loc.owner)}, verb, subject)
18: endif
19: if (verb == "@bug")
20:   player:notify("For a @bug report, be sure to mention exactly what it was you typed to trigger the error...")
21: endif
22: "Last modified by Dax (#789) on Mon Dec 10 21:33:30 2001 MST."

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