neue Funktion: HasExtraLook()

Prueft die Extralooks des Lebewesens auf die Existenz des
uebergebenen Extralook-Keys. Gibt 0 oder 1 zurueck und
sorgt dafuer, dass abgelaufene Eintraege vorher geloescht
werden.

Change-Id: I6c624b788228c0c396d7f4d9f01d08aca2c19271
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();