Lua: Add new-style hook support for HOOK_MOVE

1 files changed, 7 insertions, 0 deletions

diff --git a/src/cmd1.c b/src/cmd1.c
index 37e12f61..ce43c008 100644
--- a/src/cmd1.c
+++ b/src/cmd1.c
@@ -3098,6 +3098,13 @@ void move_player_aux(int dir, int do_pickup, int run, bool_ disarm)
 	/* Some hooks */
 	if (process_hooks(HOOK_MOVE, "(d,d)", y, x)) return;
 
+	{
+		hook_move_in in = { y, x };
+		if (process_hooks_new(HOOK_MOVE, &in, NULL)) {
+			return; /* Prevent movement */
+		}
+	}
+
 	if (p_ptr->dripping_tread > 0)
 	{
 		geomancy_random_floor(y, x, FALSE);