handle lack of DBM::Deep a bit better
authorTony Cook <tony@develop-help.com>
Sat, 28 Jul 2012 05:42:40 +0000 (15:42 +1000)
committerTony Cook <tony@develop-help.com>
Sat, 28 Jul 2012 05:42:40 +0000 (15:42 +1000)
site/cgi-bin/admin/bse_modules.pl
site/cgi-bin/admin/makeIndex.pl
site/cgi-bin/modules/BSE/Index/BSE.pm
site/docs/config.pod

index 8097491..2179641 100755 (executable)
@@ -76,6 +76,7 @@ my @base_check =
      'FLV::Info' => 0,
      'DBM::Deep' => 2,
      'CSS::Inliner' => 3042,
+     'DBM::Deep' => 0,
     },
    },
    {
index 39f6cf6..3ac0f94 100755 (executable)
@@ -114,6 +114,7 @@ sub do_regen {
   }
   
   my $good = eval {
+    local $SIG{__DIE__};
     my $indexer = BSE::Index->new
       (
        error => $errorcb,
index 1b9497d..4a65afe 100644 (file)
@@ -5,7 +5,7 @@ use BSE::DB;
 use Constants qw($MAXPHRASE);
 use BSE::CfgInfo qw(cfg_data_dir);
 
-our $VERSION = "1.002";
+our $VERSION = "1.003";
 
 sub new {
   my ($class, %opts) = @_;
@@ -23,7 +23,8 @@ sub new {
     $self->{index} = {};
   }
   elsif ($priority eq "memory") {
-    require DBM::Deep;
+    eval { require DBM::Deep; 1 }
+      or die "DBM::Deep must be installed to use [search].index_priority=memory\n";
     require File::Temp;
     my $fh = File::Temp->new;
     $self->{index} = DBM::Deep->new
index 732de4b..61cacdb 100644 (file)
@@ -816,8 +816,8 @@ C<speed> builds the index in memory and is very fast, but can consume
 a lot of memory.  Otherwise, set this to C<memory> to reduce memory
 usage.
 
-C<memory> priority index building requires that the DBM::Deep module
-be installed.
+C<memory> priority index building requires that the C<DBM::Deep>
+module be installed.
 
 =item level