/* -*- LPC -*- */ /* * $Locker: $ * $Id: dest_env.c,v 1.2 2003/02/12 16:26:52 wodan Exp $ * $Log: dest_env.c,v $ * Revision 1.2 2003/02/12 16:26:52 wodan * removed <TAB> * * Revision 1.1 1998/01/06 05:12:03 ceres * Initial revision * */ /* * Called if the environment is dested and there is no where else * to go... */ void destruct_environment_of(object ob) { object env; env = environment(ob); if (env) { string *a; a = (string *)env->query_dest_dir(); if (catch(ob->move_player(a[0], a[1], "stumbles"))) { ob->move_player("void", "/room/void", "is sucked into the"); } } } /* destruct_environment_of() */