diff --git a/std/living/description.c b/std/living/description.c
index af3bd94..04e65e2 100644
--- a/std/living/description.c
+++ b/std/living/description.c
@@ -188,6 +188,14 @@
   return XL_OK;
 }
 
+// Ist ein bestimmter, nicht bereits abgelaufener Eintrag in den
+// Extralooks vorhanden?
+public int HasExtraLook(string key) {
+  // abgelaufene Extralooks austragen
+  QueryProp(P_INTERNAL_EXTRA_LOOK);
+  return member(Query(P_INTERNAL_EXTRA_LOOK) || ([]), key);
+}
+
 void create()
 { 
   ::create();