module Tdl_types:milestone date of date when the item state changed tosig
..end
Done
.type
state =
| |
Done |
| |
Suspended |
| |
Priority_low |
| |
Priority_normal |
| |
Priority_high |
type
item = {
|
mutable item_title : |
|||
|
mutable item_date : |
|||
|
mutable item_enddate : |
(* | milestone date of date when the item state changed to Done . | *) |
|
mutable item_desc : |
|||
|
mutable item_state : |
|||
|
mutable item_id : |
val item : unit -> item
type
group = {
|
mutable group_title : |
|
mutable group_items : |
|
mutable group_groups : |
|
mutable group_id : |
val group : unit -> group