@verb #7113:"_disfunc" this none this rxdo #7113
@program #7113:"_disfunc" this none this
"this.morphn = \"Drag (Dreaming)\""
for each in (queued_tasks())
  kill_task(each[1])
  player:tell("Killed task '", each[7], "'")
endfor
pass(@args)
.