GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2025-10-31 14:47:27 +01:00
Code Issues Projects Releases Wiki Activity

Add ability to clear HashObject; rename load/save

Browse Source
This commit is contained in:
Pragmatic Software 2017-08-05 20:14:49 -07:00
parent aa65839827
commit e5bd377477
2 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
PBot/Channels.pm
View File

@ -120,13 +120,13 @@ sub is_active_op {
sub load_channels {
my $self = shift;
$self->{channels}->load_hash();
$self->{channels}->load();
}
sub save_channels {
my $self = shift;
$self->{channels}->save_hash();
$self->{channels}->save();
}
sub channels {

17
PBot/HashObject.pm
View File

@ -57,7 +57,7 @@ sub load_hash_add {
return undef;
}
sub load_hash {
sub load {
my $self = shift;
my $filename;
@ -118,7 +118,7 @@ sub load_hash {
$self->{pbot}->{logger}->log("Done.\n");
}
sub save_hash {
sub save {
my $self = shift;
my $filename;
@ -142,6 +142,11 @@ sub save_hash {
close(FILE);
}
sub clear {
my $self = shift;
$self->{hash} = {};
}
sub find_hash {
my ($self, $keyword, $arguments) = @_;
@ -216,7 +221,7 @@ sub set {
$value = $self->hash->{$hash_index}{$key};
} else {
$self->hash->{$hash_index}{$key} = $value;
$self->save_hash();
$self->save();
}
return "[$self->{name}] $hash_index: '$key' " . (defined $value ? "set to '$value'" : "is not set.");
@ -234,7 +239,7 @@ sub unset {
}
delete $self->hash->{$hash_index}{$key};
$self->save_hash();
$self->save();
return "[$self->{name}] $hash_index: '$key' unset.";
}
@ -243,7 +248,7 @@ sub add {
my ($self, $index_key, $hash) = @_;
if($self->load_hash_add($index_key, $hash, 0)) {
$self->save_hash();
$self->save_();
} else {
return "Error occurred adding new $self->{name} object.";
}
@ -263,7 +268,7 @@ sub remove {
}
delete $self->hash->{$hash_index};
$self->save_hash();
$self->save();
return "'$hash_index' removed from $self->{name}.";
}