diff options
Diffstat (limited to 'libpiny/lib/Piny/Config.pm')
| -rw-r--r-- | libpiny/lib/Piny/Config.pm | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/libpiny/lib/Piny/Config.pm b/libpiny/lib/Piny/Config.pm index 76405ee..1242c8f 100644 --- a/libpiny/lib/Piny/Config.pm +++ b/libpiny/lib/Piny/Config.pm @@ -168,21 +168,21 @@ sub tweakable { ( is => 'rw' , isa => $isa , lazy_build => 1 - , trigger => sub { - my ( $s, $new, $old ) = @_; + , trigger => sub { + my ( $s, $new, $old ) = @_; - $s->_conf->{$attrname} = $new; + $s->_conf->{$attrname} = $new; - if ( $s->has_confpath ) { - $s->save; - } else { - carp "Attribute $attrname modification ignored!"; - }; + if ( $s->has_confpath ) { + $s->save; + } else { + carp "Attribute $attrname modification ignored!"; + }; - $s->clear_conf; - my $clearer = "clear_$attr"; - $s->$clearer; - } + $s->clear_conf; + my $clearer = "clear_$attr"; + $s->$clearer; + } ); my $builder = sub { |