GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2025-01-11 12:32:37 +01:00
Code Issues Projects Releases Wiki Activity

Add set_default to prevent saving Registry when setting default value

Browse Source
This commit is contained in:
Pragmatic Software 2015-07-05 17:47:12 -07:00
parent f22f2ef12a
commit d1f5c1b705
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
PBot/Registry.pm Normal file → Executable file
View File

@ -96,8 +96,13 @@ sub remove {
$self->save;
}
sub set {
sub set_default {
my ($self, $section, $item, $key, $value) = @_;
$self->set($section, $item, $key, $value, 1);
}
sub set {
my ($self, $section, $item, $key, $value, $is_default) = @_;
$section = lc $section;
$item = lc $item;
@ -112,7 +117,7 @@ sub set {
$self->process_trigger($section, $item, $value);
}
$self->save if $result =~ m/set to/;
$self->save if $result =~ m/set to/ && not $is_default;
return $result;
}
@ -158,6 +163,7 @@ sub get_array_value {
sub add_trigger {
my ($self, $section, $item, $subref) = @_;
$self->{triggers}->{$section}->{$item} = $subref;
}