diff options
Diffstat (limited to 'lib/feedback.mli')
| -rw-r--r-- | lib/feedback.mli | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lib/feedback.mli b/lib/feedback.mli index d6d77b7cc..bda15fc58 100644 --- a/lib/feedback.mli +++ b/lib/feedback.mli @@ -30,6 +30,9 @@ val is_message : xml -> bool type edit_id = int type state_id = Stateid.t type edit_or_state_id = Edit of edit_id | State of state_id +type route_id = int + +val default_route : route_id type feedback_content = | AddedAxiom @@ -49,8 +52,9 @@ type feedback_content = | Message of message type feedback = { - id : edit_or_state_id; - content : feedback_content; + id : edit_or_state_id; (* The document part concerned *) + content : feedback_content; (* The payload *) + route : route_id; (* Extra routing info *) } val of_feedback : feedback -> xml |