… | |
… | |
1451 | |
1451 | |
1452 | my $active = eval $v->{source}; |
1452 | my $active = eval $v->{source}; |
1453 | |
1453 | |
1454 | if (length $@) { |
1454 | if (length $@) { |
1455 | error "$v->{path}: $@\n"; |
1455 | error "$v->{path}: $@\n"; |
1456 | undef $@; # work around perl 5.10.0 utf-8 caching bug |
|
|
1457 | |
1456 | |
1458 | cf::cleanup "mandatory extension '$k' failed to load, exiting." |
1457 | cf::cleanup "mandatory extension '$k' failed to load, exiting." |
1459 | if exists $v->{meta}{mandatory}; |
1458 | if exists $v->{meta}{mandatory}; |
1460 | |
1459 | |
1461 | warn "$v->{base}: optional extension cannot be loaded, skipping.\n"; |
1460 | warn "$v->{base}: optional extension cannot be loaded, skipping.\n"; |