Don't use a turn trying to tele/blink when constricted.

Also, change the status information: when you would be prevented from
teleporting, make the "Constr" status light red, add "-Tele", and add a
note to @.

1 files changed, 9 insertions, 0 deletions

diff --git a/crawl-ref/source/teleport.cc b/crawl-ref/source/teleport.cc
index 5a0ca7bd9e..e47dc65573 100644
--- a/crawl-ref/source/teleport.cc
+++ b/crawl-ref/source/teleport.cc
@@ -38,6 +38,15 @@ bool player::blink_to(const coord_def& dest, bool quiet)
             canned_msg(MSG_STRANGE_STASIS);
         return (false);
     }
+    else if (you.is_constricted_larger())
+    {
+        if (!quiet)
+        {
+            mprf("%s prevents you from blinking.",
+                 mindex_to_actor(you.constricted_by)->name(DESC_THE).c_str());
+        }
+        return (false);
+    }
 
     if (!quiet)
         canned_msg(MSG_YOU_BLINK);