Site-Locks #70

Parent #45Owner #2Flags Source RPG Core/rpgcore-patched.db

Aliases: Site-Locks

1 verbs · 23 properties · 0 children

Verbs

VerbSpecFlagsDefinerLines
init_for_corethis none thisrxd#7024

Properties

PropertyDefinerFlagsOwnerValue
moderator_notify#45rc#2{}
last_msg_date#45r#360
messages_going#45rc#36{}
moderated#45rc#21
moderator_forward#45rc#2"%n (%#) can't send to moderated list %t (%[#t]) directly."
writers#45rc#2{}
readers#45rc#2{}
mail_notify#45r#36{#2}
mail_forward#45r#36{}
expire_period#45r#362592000
last_used_time#45r#360
messages#45rc#36{}
rmm_own_msgs#45rc#2<clear>
guests_can_send_here#45rc#2<clear>
messages_kept#45r#36<clear>
registered_email#45rc#36<clear>
email_validated#45rc#36<clear>
validation_password#45rc#36<clear>
key#1c#2<clear>
aliases#1r#36{"Site-Locks"}
description#1rc#2"Notes on annoying sites."
object_size#1r#36{1746, -1090650497}
html#1rc#2<clear>

Ancestry

Ancestors (nearest first): #45 Generic Mail Recipient#1 Root Class

Children: none

Call graph

calls n70_0 #70:init_for_core n45_27 #45:init_for_core n70_0->n45_27 n56_8 #56:suspend_if_needed n70_0->n56_8

Source

init_for_core

Spec this none thisFlags rxdOwner #2Definer #70

Referenced by

none

Source

1if (caller_perms().wizard)
2pass();
3"this:rm_message_seq({1, 1 + this:length_all_msgs()})";
4"this:expunge_rmm()";
5for p in (properties(this))
6$command_utils:suspend_if_needed(0);
7if (p && (p[1] == " "))
8delete_property(this, p);
9endif
10endfor
11while ("secret_SHHH" in verbs(this))
12delete_verb(this, "secret_SHHH");
13endwhile
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