[Turn on line numbering]
arg name, @branches;
var messages, branch, msg;
caller() != definer() && (> .perms(sender()) <);
messages = msgs || #[];
if (!dict_contains(messages, name))
return;
if (!branches) {
messages = dict_del(messages, name);
} else {
msg = messages[name];
for branch in (branches) {
if (dict_contains(msg, branch))
msg = dict_del(msg, branch);
}
if (!msg)
messages = dict_del(messages, name);
else
messages = dict_add(messages, name, msg);
}
if (!messages)
clear_var('msgs);
else
msgs = messages;
// $#Edited: 20 Aug 04 10:13 $lynx
["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]