Method code for $builder.teleport()

[Turn on line numbering]

---

arg dest;
var m, source, vars;

source = .location();
catch any {
    .move_to(dest);
} with {
    .tell(traceback()[1][2]);
    return 0;
}
vars = #[["$actor", this()], ["actor", .name()], ["$source", source], ["source", source.name()], ["$dest", dest], ["dest", dest.name()]];
m = .eval_message("teleport", $builder, vars);
dest.announce(m);

// located locations 
if ((| source.location() |) != dest)
    source.announce(m);

// $#Edited: 15 Feb 02 15:08 $brandon

---

["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]