Changeset 21617

Show
Ignore:
Timestamp:
25.01.2010 17:05:43 (9 years ago)
Author:
mdewsnip
Message:

Changed plugin.pm so it uses &dbutil::get_infodb_file_path() directly, instead of calling inexport::src_db_file(). Part of making the code less GDBM-specific.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/plugin.pm

    r21564 r21617  
    2626package plugin; 
    2727 
    28 use inexport; 
    2928 
    3029use strict; # to pick up typos and undeclared variables... 
     
    225224    print STDERR "in remove some\n"; 
    226225    return if (scalar(@$deleted_files)==0); 
    227     my $arcinfo_src_filename = &inexport::src_db_file($archivedir); 
     226    my $arcinfo_src_filename = &dbutil::get_infodb_file_path("gdbm", "archiveinf-src", $archivedir); 
    228227 
    229228    foreach my $file (@$deleted_files) {