363
@verb #1492:"remember" any on top of/on/onto/upon this rxd #60
@program #1492:"remember" any on top of/on/onto/upon this
"remember <entry/here> on <this>"
"  add the entry (or this menu) to the 'remembered set' for this room."
"  use 'remembered' to retrieve the set."
if (!this.stack)
  return player:tell("Sorry, remembering remembered nodes doesn't work.")
endif
if (dobjstr == "")
  parse = this.stack[1]
  desc = "the current menu"
elseif (choice = this:match_choice(dobjstr))
  parse = $gopher:parse(this.value[choice])
  desc = this.desclines[choice]
else
  "Match_choice took care of it."
  return
endif
parse[4] = parse[4][1] + $command_utils:read("description for " + desc)
this.remembered = {@this.remembered, $gopher:unparse(@parse)}
this:announce_op("%N %<remembers> ", desc, " on the %t as ", parse[4][2..length(parse[4])], ".")
.

0