From 8e2758fec796d5e4e684f86bc1662f85222096c6 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Wed, 26 Jan 2022 03:04:23 -0300
Subject: Fix some security issues and transfer some GM commands.

- @getvar against self is now GM 80
- @event wrapper is now GM 80
- @blessing is now GM 80 and can be used by others beside Jesusalva
---
 npc/commands/warp.txt | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'npc/commands/warp.txt')

diff --git a/npc/commands/warp.txt b/npc/commands/warp.txt
index adca7ab9f..4f98ac533 100644
--- a/npc/commands/warp.txt
+++ b/npc/commands/warp.txt
@@ -54,6 +54,10 @@ OnCall:
         ++.@e;
     }
 
+    if (getmapflag(.@map$, mf_nowarpto) && !(is_admin() || $@GM_OVERRIDE)) {
+        dispbottom("This map is restricted and cannot be warped to.");
+        close;
+    }
     cwarp .@map$, .@x, .@y; // XXX: maybe here use a slide_or_warp function
 
 OnInit:
-- 
cgit v1.2.3-70-g09d2