Deklination der Adjektive korrigiert

Change-Id: I9334e705a2f2d9945fd530ad1240b2c6afd020e2
diff --git a/items/kraeuter/virtual_compiler.c b/items/kraeuter/virtual_compiler.c
index caf2324..c0c3a7f 100644
--- a/items/kraeuter/virtual_compiler.c
+++ b/items/kraeuter/virtual_compiler.c
@@ -162,8 +162,12 @@
         str=props[INGREDIENT_ADJ];
         if (stringp(str))
         {
-          str=DeclAdj(lowerstring(str), WEN, 0);
-          previous_object()->AddAdjective(str);
+          str = lowerstring(str);
+          string* adj = ({});
+          foreach(int casus : ({WER,WESSEN,WEM,WEN})) {
+            adj += ({ trim(previous_object()->DeclAdj(str, casus, 0)) });
+          }
+          previous_object()->AddAdjective(adj);
         }
       }  // Ende Konfiguration eines VC-erzeugten Objekts
       // Plant-ID wird fuer alle Objekte auf irgendwas gesetzt.