@verb #12:"msg_postscript" this none this rxdo #55
@program #12:"msg_postscript" this none this
"Returns the postscript for a message on a newsgroup.  This is where related messages are displayed if the proper options are set."
{ng, msg_num} = args
caller_perms().wizard || raise(E_PERM)
ps = {}
if (!this:mail_option("showreferences") && !this:mail_option("showreplies"))
  return ps
endif
msgid = ng:get_message_id(msg_num)
if (this:mail_option("showreferences"))
endif
if (this:mail_option("showreplies"))
  tree = $mail_agent:hyperlinky_reply_tree(ng, msgid)
  if (tree)
    ps = {@ps, "-----", "<i>Replies</i>:", @$su:display_tree("HEADLESS!", tree)[3..$]}
  endif
endif
return ps
"Last modified by Lao-Tzu (#8084) on Sun Nov 24 20:10:18 2002 MST."
.