Added name entry
This commit is contained in:
parent
0580332d14
commit
3dfce1e7f6
@ -276,6 +276,13 @@ sub set_alignment
|
|||||||
$self->{personal}->{alignment} = shift;
|
$self->{personal}->{alignment} = shift;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
# Sets the character's name to the passed string:
|
||||||
|
sub set_name
|
||||||
|
{
|
||||||
|
my $self = shift;
|
||||||
|
$self->{personal}->{name} = shift;
|
||||||
|
}
|
||||||
|
|
||||||
# Encodes the character to JSON:
|
# Encodes the character to JSON:
|
||||||
sub as_json
|
sub as_json
|
||||||
{
|
{
|
||||||
|
Loading…
Reference in New Issue
Block a user