@verb #1112:"list_units" this none this rxdo #7788
@program #1112:"list_units" this none this
for x in (this.units)
  player:tell($su:center(x[1], player:linelength(), "-"))
  player:tell($su:columnize(x[2], 3))
endfor
player:tell($su:space(player:linelength(), "-"))
"Last modified by Dax (#789) on Thu Jul  9 17:28:47 1998 EDT."
.