Querymethode auf P_INFO
Auch an den Basisobjekten darf dranstehen, dass sie
als Koeder benutzt werden koennen. Wenn ein erbendes
Objekt die Property manuell setzt, wird stattdessen
deren Inhalt ausgegeben.
Change-Id: Ieb36ed7780616d8b210c8c0597678f7b401b8fa9
diff --git a/std/items/fishing/koeder.c b/std/items/fishing/koeder.c
index c63317b..d61136a 100644
--- a/std/items/fishing/koeder.c
+++ b/std/items/fishing/koeder.c
@@ -18,6 +18,14 @@
SetProp(P_SHORT, "Ein kleiner Wurm");
SetProp(P_LONG, "Ein kleiner Regenwurm.\n");
SetProp(P_MATERIAL, MAT_MISC_LIVING);
+ Set(P_INFO, function string() {
+ string msg = Query(P_INFO, F_VALUE);
+ if ( stringp(msg) && sizeof(msg) )
+ return msg;
+ else
+ return break_string(Name(WER,1)+" laesst sich bestimmt als Koeder "
+ "zum Angeln verwenden.",78);
+ }, F_QUERY_METHOD);
SetProp(P_VALUE, 1);
SetProp(P_WEIGHT, 5);
}