Changeset 33 for trunk/src/json

Timestamp:

06/05/09 10:42:59 (16 years ago)

Author:

lgiessmann

Message:

client ajax: added the basic handling for roleplayer-constraints and associationrole-constraints

File:

• trunk/src/json/json_tmcl.lisp (modified) (2 diffs)

trunk/src/json/json_tmcl.lisp ¶

@@ -193 +193 @@
                                        (list-instances (getf involved-topic-tupple :player) topictype topictype-constraint))))
                         (json-role
-                         (concatenate 'string "\"roleTypes\":"
+                         (concatenate 'string "\"roleType\":"
                                       (topics-to-json-list
                                        (getf (list-subtypes (getf involved-topic-tupple :role) roletype roletype-constraint) :subtypes))))
@@ -292 +292 @@
                                        (list-instances (getf role-player-tupple :player) topictype topictype-constraint))))
                         (json-role
-                         (concatenate 'string "\"roleTypes\":"
+                         (concatenate 'string "\"roleType\":"
                                       (topics-to-json-list
                                        (getf (list-subtypes (getf role-player-tupple :role) roletype roletype-constraint) :subtypes))))