View/Edit #12:parse_message_seq body_msg_seq display_seq_headers display_seq_full messages_in_seq list_rmm new_message_num length_num_le length_date_le length_date_gt length_all_msgs exists_num_eq rm_message_seq undo_rmm expunge_rmm renumber headers_in_seq get_num num2indices lock_mail_agent get_message set_message from_msg_seq %from_msg_seq to_msg_seq %to_msg_seq subject_msg_seq length_in_seq get_message_id unread_messages get_msgnum_from_id get_inreplyto

Switch to edit mode.

Name(s): parse_message_seq body_msg_seq display_seq_headers display_seq_full messages_in_seq list_rmm new_message_num length_num_le length_date_le length_date_gt length_all_msgs exists_num_eq rm_message_seq undo_rmm expunge_rmm renumber headers_in_seq get_num num2indices lock_mail_agent get_message set_message from_msg_seq %from_msg_seq to_msg_seq %to_msg_seq subject_msg_seq length_in_seq get_message_id unread_messages get_msgnum_from_id get_inreplyto
1:  if (verb == "set_message" && length(args) == 2 && typeof(args[1]) == $STR)
2:    return pass(@args)
3:  endif
4:  "parse_message_seq(strings,cur)         => msg_seq"
5:  "messages_in_seq(msg_seq);              => text of messages in msg_seq"
6:  "display_seq_headers(msg_seq[,current]) :displays summary lines of those msgs"
7:  "rmm_message_seq(msg_seq)               => string giving msg numbers removed"
8:  "undo_rmm()    => msg_seq of restored messages"
9:  "expunge_rmm() => number of messages expunged"
10: "list_rmm()    => number of messages awaiting expunge"
11: "renumber(cur) => {number of messages in folder, new_cur}"
12: ""
13: "See the corresponding routines on $mail_agent."
14: if (caller == $mail_agent || $perm_utils:can_hack())
15:   "I believe the can_hack check is sufficent. - Lao"
16:   "  set_task_perms(this.owner);"
17:   return $mail_agent:(verb)(@args)
18: else
19:   return E_PERM
20: endif
21: "Last modified by Dax (#789) on Tue May  3 13:43:06 2005 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Slacker (#55)

You are not logged in.

[home | help | who | search | setup | code]