Site-Locks #64

Parent #37Owner #361Flags readSource hellcore/hellcore.db

Aliases: Site-Locks

1 verbs · 31 properties · 0 children

Verbs

VerbSpecFlagsDefinerLines
init_for_corethis none thisrxd#6424

Properties

PropertyDefinerFlagsOwnerValue
moderator_notify#37rc#361{}
last_msg_date#37r#290
messages_going#37#29{}
moderated#37rc#3611
moderator_forward#37rc#361"%n (%#) can't send to moderated list %t (%[#t]) directly."
writers#37rc#361{}
readers#37rc#361{}
mail_notify#37r#29{#661362}
mail_forward#37r#29{}
expire_period#37r#292592000
last_used_time#37r#291337753960
messages#37#29{}
rmm_own_msgs#37rc#361<clear>
guests_can_send_here#37rc#361<clear>
messages_kept#37r#29{}
registered_email#37#29<clear>
email_validated#37#29<clear>
validation_password#37#29<clear>
barcolor#37rc#361"red"
hidden_subjects#37rc#361<clear>
hidden_content#37rc#361<clear>
aliases#1r#29{"Site-Locks"}
description#1rc#361"Notes on annoying sites."
object_size#1r#29{239817, 1298433815}
hidden_verbs#1rc#361<clear>
phelp_msg#1rc#361<clear>
weight#1rc#361<clear>
owner_verbs#1rc#361<clear>
plural_name#1rc#361<clear>
client_image#1rc#361<clear>
listening#1rc#361<clear>

Ancestry

Ancestors (nearest first): #37 Generic Mail Recipient#1 root

Children: none

Call graph

calls n64_0 #64:init_for_core n45_18 #45:defines_verb n64_0->n45_18 n37_27 #37:init_for_core n64_0->n37_27 n48_8 #48:suspend_if_needed n64_0->n48_8

Source

init_for_core

Spec this none thisFlags rxdOwner #361Definer #64

Referenced by

none

Source

1if (caller_perms().wizard)
2while ($object_utils:defines_verb(this, "secret_SHHH"))
3delete_verb(this, "secret_SHHH");
4endwhile
5pass();
6"this:rm_message_seq({1, 1 + this:length_all_msgs()})";
7"this:expunge_rmm()";
8for p in (properties(this))
9$command_utils:suspend_if_needed(0);
10if (p && (p[1] == " "))
11delete_property(this, p);
12endif
13endfor
14this.messages = this.messages_going = {};
15this.mail_forward = {};
16this.mail_notify = {player};
17player.current_message = {@player.current_message, {this, 0, 0}};
18for p in ({"moderator_forward", "moderator_notify", "writers", "readers", "expire_period", "last_used_time"})
19this.(p) = $mail_recipient.(p);
20endfor
21this.moderated = 1;
22else
23return E_PERM;
24endif