89 0 1 10 level (0) 89 0 0 5 . owner (#7) 89 0 0 5 . pubread (1) 89 0 0 5 . pubwrite (0) 89 0 0 5 . fertile (1) 89 0 0 5 . name ("a todo list") 89 0 0 5 . location (#7) 89 0 0 5 . description ("Scrawled on this slightly torn piece of paper are a list of things that the writer has been meaning to do but hasn\'t gotten around to yet.") 7 0 0 5 . aliases (("todo" "list")) 7 0 0 5 . tasks (("add @undig command")) 7 0 0 5 . 2 addtask (do (settaskperms caller) (let ((task-desc dobjstr) (cur-tasks self.tasks)) (do (setprop self "tasks" (push cur-tasks task-desc)) (caller:tell "Task added.")))) . 7 0 oAny pAt oThis 5 . description . 7 0 oThis pNone oThis 5 .