|
Lines 341-354
the value cannot be properly decoded as YAML.
Link Here
|
| 341 |
|
341 |
|
| 342 |
sub yaml_preference { |
342 |
sub yaml_preference { |
| 343 |
my ( $self, $preference ) = @_; |
343 |
my ( $self, $preference ) = @_; |
|
|
344 |
my $value = $self->preference( $preference ); |
| 345 |
if ($value) { |
| 346 |
my $yaml = eval { YAML::XS::Load( Encode::encode_utf8( $self->preference( $preference ) ) ); }; |
| 347 |
if ($@) { |
| 348 |
warn "Unable to parse $preference syspref : $@"; |
| 349 |
return; |
| 350 |
} |
| 344 |
|
351 |
|
| 345 |
my $yaml = eval { YAML::XS::Load( Encode::encode_utf8( $self->preference( $preference ) ) ); }; |
352 |
return $yaml; |
| 346 |
if ($@) { |
|
|
| 347 |
warn "Unable to parse $preference syspref : $@"; |
| 348 |
return; |
| 349 |
} |
353 |
} |
| 350 |
|
|
|
| 351 |
return $yaml; |
| 352 |
} |
354 |
} |
| 353 |
|
355 |
|
| 354 |
=head2 enable_syspref_cache |
356 |
=head2 enable_syspref_cache |
| 355 |
- |
|
|