@verb #1180:"show_todo_list" this none this rxdo #9633
@program #1180:"show_todo_list" this none this
if (!this.todo_items)
  player:tell("There are no ToDo items to show.")
  return
endif
if (!args)
  line = {}
  lines = {}
  count = 1
  for x in (this.todo_list)
    line = setadd(line, toliteral(count))
    line = setadd(line, x[1])
    line = setadd(line, x[2])
    line = setadd(line, x[3])
    lines = setadd(lines, line)
    count = count + 1
  endfor
  player:tellcolumns(1, {1, 1, 1, 1}, {"Number", "Name", "Description", "Due Date"}, @lines)
else
  item = this.todo_list[args[1]]
  player:tell("ToDo: " + item[1])
  player:tell("Due Date: " + item[3])
  player:tell("Details:")
  player:tell(item[4])
endif
"Last modified by Dean (#9633) on Wed May 22 05:40:59 2002 MDT."
.