use Text::Unaccent::PurePerl because other one segfaults

[MojoFacets.git] / lib / MojoFacets / Config.pm

diff --git a/lib/MojoFacets/Config.pm b/lib/MojoFacets/Config.pm
index c1e4273..0769259 100644 (file)
--- a/lib/MojoFacets/Config.pm
+++ b/lib/MojoFacets/Config.pm
@@ -12,10 +12,12 @@ sub index {
                MASTER
                MAX_FACETS
                PROFILE
+               DEBUG
        ));
 
        foreach my $name ( @config ) {
-               if ( my $val = $self->param($name) ) {
+               my $val = $self->param($name);
+               if ( defined $val ) {
                        $ENV{$name} = $val;
                        warn "$name = $val\n";
                }